使用基数R和地图无法摆脱多重时隙中的某些空间

Question

我正在尝试删除顶部和底部图之间的空间，但找不到我需要修改的参数。我尝试了一些不同的东西，并认为我发现我的地图重置par（mar）参数的问题，例如，here，但这不是它！

见图：

任何想法。我希望将所有这些地图放在一起（下面的顶部3和2之间没有空格），但是希望只有左下方的地图显示轴。

我的代码：

    library(mapdata)#for "worldHires"
    library(maps)
    op<-par(mfcol=c(2,3),oma=c(0,2,0,0),mar=c(2,2,0,0))

for (j in 1:5){
    map("worldHires", fill=T,xlim=c(-70,-55),ylim=c(66,71),col=c(gray(0.8),gray(0.6)),mar=c(0,0,0,0))
      if (j==2){
        map.axes()
      }
      else{
    box(col = "black")
      }
     text(-56,66.5,paste(j),font=2,cex=1.5)
    }
par(op)

Answer 1

好的，这是使用@ miles2know建议的布局修复顶部和底部地图之间的一些白色间隙的一种方法。然而，这并不是我所希望的，即所有地图之间没有更多的空间！对此有任何帮助将非常感激。

library(maptools)
library(maps)

mat<-matrix(c(1:6),2,3,byrow=T)
matly<-layout(mat,respect=T)
layout.show(matly)

# jpeg("maps2.jpeg")
layout(mat,respect=T)
op<-par(mar=c(0,0,0,0), mgp=c(0,1,0),oma=c(0.5,2,0,0))#mgp:affect the margin line for the axis
for (j in 1:5){
map("worldHires", fill=T,xlim=c(-70,-55),ylim=c(66,71),col=c(gray(0.8),gray(0.6)),mar=c(0,0,0,0))
  if (j==4){
    map.axes()
  }
  else{
box(col = "black")
  }
 text(-56,66.5,paste(j),font=2,cex=1.5)
}
par(op)
# dev.off()

新情节