这周做ICM2011,有一个能源结构的预测,正好看到一个树状图包,就试用了一下:
必要的包:ggplot2,treemapify
输入数据:
library(treemapify)
energy<-data.frame(value<-c(1240.11,23.90,1393.30,805.33,265.83,17.42,
36.75,226.87,40.50,22.07),kind<-c('coal','oil','gas','nuclear','hydro','geo','solar','wind','wood','bio other'))
energy$kind<-as.factor(energy$kind)
ggplot(data=energy,aes(area=value))+geom_treemap()
233,黑乎乎的一片,啥玩意
继续优化,在ggplot的aes映射中加一个颜色参数:
ggplot(data=energy,aes(area=value,fill=kind))+geom_treemap()
似乎已经可以看了!不过对照右边看还是比较困难,来加个标签:
ggplot(data