r - 在 ggplot2 中创建填充标志(或图像)的条形图

Question

我正在使用 ggplot2 创建条形图其中每个条代表一个国家。我希望每个条形的填充都是该国的国旗，以便于识别。

这是一个简单的例子

library("ggplot2")
DF <- data.frame(country = c("UK", "France", "Germany"), 
                 value=c(4, 3, 7))
ggplot(DF, aes(x=country, y=value, fill="#f00")) + geom_bar(stat="identity")

我希望这些条是彩色的/旗帜图像，而不是红色的条。有人对此有想法/建议吗？

Answer 1

这里可能的方法是散点图，而不是条形图 - 我仍然希望您发现它有帮助。 ggflags 包 ( https://github.com/YTLogos/ggflags ) geom_flag 使用 ggplot 美学 x、y 和国家/地区显示圆形、相当大的旗帜图像。

devtools::install_github("YTLogos/ggflags") 

library("ggplot2")
library(ggflags)
DF <- data.frame(country = c("UK", "France", "Germany"), 
                 value=c(4, 3, 7))
ggplot(DF, aes(x=country, country=country, y=value)) + geom_flag(size = 10)

此处选择静态大小 10 只是为了可见性，但它也可以是可变大小。