连续和要素栅格的完美结合

Question

使用runserver用rasterVis::levelplot绘制连续和因子栅格的混合图时，面板的高度和宽度不一致。这似乎是由于colorkey（图例）的宽度和colorkey的刻度标签不同所致。

例如：

print(..., more=TRUE)

是否可以修改网格图形参数（例如，布局宽度/高度？）以实现大小一致的图，从而使其看起来更像在绘制RasterStack时使用的布局？

或者是否有其他组合这些栅格的方法，可以缩放到具有多列和多行的布局？ （其他绘图框架都可以，但是基本绘图并不容易支持因子栅格。）

Answer 1

您可以使用?c.trellis软件包中的latticeExtra函数。

library(latticeExtra)
c(p1, p2, layout = c(1, 2), merge.legends = TRUE)

但是，在您的情况下，图例会稍微重叠。如果绘图顺序不相关，则可以使用

c(p2, p1, layout = c(1, 2), merge.legends = TRUE)

或者，您可以如下所示在第一个图上添加一些空间。

p1 <- levelplot(r1, margin=FALSE, scales=list(draw=FALSE), 
                at=seq(0, 1, length.out=100), 
                par.settings = rasterTheme(layout.widths = list(key.right = 1.5)))
c(p1, p2, layout = c(1, 2), merge.legends = TRUE)