群里有朋友问这个图怎么画，我想了想，这肯定是ggplot完成的，非常简单，但是菜鸟们缺乏实践，可能会困惑，所以我模拟数据画了一个！
首先构造数据
dat=data.frame(name=LETTERS[1:21],
number=abs(rnorm(21)*10),
type=c(rep("BP",7),rep("CC",7),rep("MF",7))
)
# 请务必自己查看dat是一个什么数据，print出来即可
# 然后对这个数据画图，一行代码即可！！！
library(ggplot2)
ggplot(dat,aes(x=name,y=number,fill=type))+geom_bar(stat="identity")+coord_flip()
看起来是不是很像回事啦！细节我就懒得调控啦！
其实自己搜索即可！坐标轴和主题都是可以控制的