R语言ggplot2画横向直方图以及去掉图例

Python031

R语言ggplot2画横向直方图以及去掉图例,第1张

eg:

ggplot(TZP_new,aes(x=Cell_type,y=Percentage,fill=Cell_type))+geom_bar(stat="identity")+coord_flip()+guides(fill = F)

其中,corrd_flip()选项即为把图像横向参数

guides为调节图例隐藏的参数。

参照http://yangl.net/2016/08/09/axis_text_x/这个博客

data=c(4.51,10.69,9.33,7.34,5.09,11.68,4.47,8.53,13.99,5.22,4.22,9.23,7.86)

labs=c(“Species1″,”Species2″,”Species3”, “Species4”, “Species5”, “Species6”, “Species7”, “Species8”, “Species9”, “Species10”, “Species11”, “Species12”, “Species13”)

barplot(data,col=c(“steelblue”,”steelblue”,”steelblue”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”mediumturquoise”,”sandybrown”,”hotpink”,”hotpink”,”hotpink”),ylim=c(0,14),width=1,space=1,ylab=”%(……)”,las=1)

text(x=seq(1.5,25.5,by=2),y=-0.15, srt = 45, adj = 1, labels = labs,xpd = TRUE)

说白了就是自己用text设置标签,注意SRT=45