到处寻找,但无法找到答案。
无法弄清楚如何在BETWEEN x点之间留出空间。我发现的一切都谈到了vjust。
我的图表: http://imgur.com/kcJ5MCv
代码:
df.307b<-read.csv('307B.csv')
colnames(df.307b)<-c('Chr', 'Reads')
p<-ggplot(data=df.307b, aes(Chr, Reads)) + geom_bar(stat="identity")
require(scales)
p + theme(axis.text.x = element_text(angle = 90, hjust = 1)) + scale_y_continuous(labels = comma) + ggtitle("307B_WES_Read_distribution")
我一直在寻找一个半小时。尝试了调整,调整,缩放_x_连续。
谢谢你们
答案 0 :(得分:1)
您的问题是图形的字体大小和水平大小的组合。基本上,字体太大,或者图形太小。
最好的解决方案是遵循William Cleveland的建议并翻转你的轴,将文本轴放在垂直方向上。您的ggplot调用应该如下所示:
p<-ggplot(data=df.307b, aes(Chr, Reads)) + geom_bar(stat="identity") + coord_flip()
如果您使用geom_point()
代替geom_bar()
,通常会更容易阅读图表。
另一种方法是手动保存图表,使用width
和height
参数来获得宽高比和字体大小的正确组合:
ggsave("plot.png", p, height = 3, width = 6, units = "in", dpi = 300)
然而,在x轴上的类别总是容易出现这样的问题,并且读取旋转文本所需的扭曲总是使这些图形比使用coord_flip()
更不易读。