如何解决从R中的3个图barplot切掉的2行轴标签
我将三个条形图组合成一个图：
set.seed(10)
x <- runif(12,min=0,max=5)
months <- c("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
colours <- c(rep("blue",2),rep("white",9),"blue")
png(file="random_precipitation.png",width=600,height=600)
par(mfrow=c(3,1))
barplot(x,names.arg=months,col=colours,ylab="Average precipitation \n(mm)",main="Random",cex.lab=1.5,cex.main=1.5,cex.names=1.5,cex.axis=1.5)
barplot(x,cex.axis=1.5)
dev.off()
我更改了y轴标签，并用"Average precipitation \n(mm)"使\n两行。
但是"Average precipitation"部分被切除：
我试图通过更改oma=c(0,3,0)函数中的余量par()来解决此问题：
png(file="random_precipitation2.png",1),oma=c(0,0))
barplot(x,cex.axis=1.5)
dev.off()
它会增加左侧的外边距，但文本仍被截断：
我尝试在mar=函数中使用par()：
png(file="random_precipitation2.png",mar=c(0,0))
barplot(x1,cex.axis=1.5)
barplot(x1,cex.axis=1.5)
dev.off()
这也不起作用，各个图重叠：
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
