使用spplot在R中的單個頁面上放置多個圖？

Question

我知道在使用簡單函數圖時如何繪制兩個圖：

 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)

Answer 2

甚至更簡單：

grid.arrange(spplot(df.voro2, "my.data", xlab = "x", ylab = "y", main = "my title") , 
             spplot(df.voro, "dummy", xlab = "x2", ylab = "y2", main = "my title2" ))