我必须在R中绘制141个直方图.我正在使用Windows 8.然后我写道:
par(mfcol=c(12,12), oma=c(1,1,0,0))
for(m in 1:141 ){
x <- precData[[m]]
hist(x[x != 0],30, xlab=NA, ylab=NA, main=statData$Name[m])
}
Run Code Online (Sandbox Code Playgroud)
但总是我得到这个错误:plot.new()中的错误:数字边距太大
我该怎么解决?是否有任何调整每个直方图大小的命令?
谢谢.
您可以设置外边距(在整个图集外部),但内边距(对于每个面板)都是默认值.如果边距为默认值,则每个面板中没有足够的空间来绘制直方图并具有边际信息.
因此,您还需要更改内边距,如果您希望任何内容看起来合理,那么您还应该更改要添加的内容的大小和位置.
这是一个例子(因为你的例子不可复制,我不得不改为随机数据):
par(mfcol=c(12,12), oma=c(1,1,0,0), mar=c(1,1,1,0), tcl=-0.1, mgp=c(0,0,0))
for(m in 1:141 ){
x <- rnorm(100)
hist(x[x != 0],30, xlab=NA, ylab=NA, main=paste('data: ',m),
cex.axis=0.5, font.main=1, cex.main=0.8)
}
Run Code Online (Sandbox Code Playgroud)