image.png
之前有读者在公众号留言问开头的图应该如何画？我第一眼看到这个图简单的理解为了堆积柱形图，加折线图。所以基本的想法就是构造两份数据来画这个图，第一份用来画堆积柱形图，第二份用来画折线图。但是准备画图的时候才意识到这个堆积柱形图是一个分组的堆积柱形图，我之前画的都是单独的，没有画过分组的。一时还想不起来该如何画这个分组的堆积柱形图了。
今天找资料的时候找到一个链接 Beginners Guide to Creating Grouped and Stacked Bar Charts in R With ggplot2 | theduke.at 这里介绍了分组的堆积柱形图可以用分面的方式来实现，比如如下代码
dat
year=factor(sample(:,400,replace=T)),
continent=factor(sample(c("EU","US","Asia"),
400,replace=T)),
gender=factor(sample(c("male","female"),
400,replace=T)),
amount=sample(20:5000,400,replace=T)
)
head(dat)
library(ggplot2)
ggplot(da
