r - 使用 spplot 在 R 中的单个页面上放置多个图？

Question

我知道如何在使用简单函数 plot 时绘制两个图:

 old.par <- par(mfrow=c(1, 2))
 plot(faithful, main="Faithful eruptions")
 plot(large.islands, main="Islands", ylab="Area")
 par(old.par)

这将返回诸如:



我需要为相当复杂的 spplot 函数做同样的事情。我想要的是一个 3 x 3 的正方形。

我想绘制 9 次的函数是:

labelat = fivenum(gwr.res$SDF$Unempl)
labeltext = labelat 


spplot(gwr.res$SDF, "Unempl", cuts = 4, at = c(fivenum(gwr.res$SDF$Unempl)),     col.regions = Greens,
    colorkey=list(width=0.3,      
              space="right", 
              tick.number=5, 
              labels=list(  
                at=labelat, 
                labels=labeltext ))) 

关于如何解决这个问题的任何想法？

谢谢，

Answer 1

使用 grid.arrange 包中的 gridExtra 。执行 grid.arrange(spplot(..),spplot(...),spplot(.....)) 等会将它们排列在网格中。

这是一个使用 meuse 数据集的示例，该数据集生成 9 个这样的图，然后使用 do.call 来节省必须执行的 grid.arrange(plots[[1], plots[[2]], 等等，最多 9 个:

> require(gridExtra)
> plots = lapply(names(meuse)[1:9], function(.x) spplot(meuse,.x))
> do.call(grid.arrange,plots)