我希望这些条形图彼此靠近,但不是相邻的(beside=FALSE)
,我还希望条形图稍微变薄。我玩过space
和width
,但我没有得到我想要的结果。
我更喜欢使用barplot功能而不是使用ggplots,但如果没有办法考虑,那就没关系。
这是预期的条形图(从获得的手动编辑):
这是获得的:
使用的代码:
jpeg("03.Annotation.Distribution.DMRs.All.jpeg")
bp1 = barplot(ann[,1:2], ylim=c(0,1.1), col=ann[,3], beside=FALSE, space=10,
names.arg=c("Genome","DMRs"), las=3, xlab="Group", ylab="Frequency",
main="Annotation distribution on DMRs")
legend("top",legend=rownames(ann)[7:1], fill=ann[7:1,3], bty="n", horiz=FALSE)
dev.off()
三江源!
答案 0 :(得分:1)
条的宽度与您正在使用的设备的大小有关。你可以根据你的数据设置一个新的绘图窗口来修改间距,然后加上它,即使xlim
比你需要的大。{/ p>
jpeg('./tmp.jpg', width = 250, height = 480, bg = 'grey90')
plot.new()
plot.window(c(0,6), c(0,1))
with(mtcars,
barplot(prop.table(table(gear, vs), 2), col = 1:3, add = TRUE,
legend.text = unique(gear), xlab = 'vs'))
dev.off()