php - 如何在一个窗口中绘制 66 个图形 - plot.new() 中的错误：图形边距太大 (MATRIX[i,j,k])

Question

我想绘制 12 个变量之间的 Net Pairwise Directional Connectedness。矩阵如下所示[1:12,1:12,1:327]。通过运行代码，我得到了错误：Error in plot.new() : figure margins too large

我尝试了许多类似问题的建议（拖动窗口par("mar")；；dev.off()) 我还跑去pdf(file='plot.pdf', width=10, height=10)以 pdf 格式打开输出...

你能帮我么？我将感激不尽

这是代码

kk = k*(k-1)/2
par(mfcol=c(ceiling(kk/2),2), oma=c(0.5,0.5,0,0), mar=c(1.5,1,1.5,1), mgp=c(0.5,0.5,0))
for (i in 1:k) {
   for (j in 1:k) {
      if (i<j) {
         plot(date, npso[j,i,], xlab="", ylab="", type="l", col="grey20", las=1, main=paste0(NAMES[i],"-",NAMES[j]),tck=0.02,yaxs="i",ylim=c(-15,5),cex.axis=0.75)
         grid(NA, NULL, lty=3)
         polygon(c(date, rev(date)), c(rep(0,t), rev(npso[j,i,])), col="grey20", border="grey20")
         lines(date_rw, NPSO[j,i,], col="red")
         box()
      }
   }
}

请注意，我不是 R 方面的专家。非常感谢提前

标签： phprplotmargin