如何修复多个 spplots 中的颜色比例尺？

Question

我正在几个空气质量站之间进行 idw 插值。对于最终的可视化，我想将我制作的所有图像折叠成 GIF。一切正常，唯一的问题是每个图像的值比例都会发生变化，并且比例会随着值（最小值 - 最大值）而变化。如何将颜色的比例设置为固定值？

下面是一些示例数据：

data(meuse.grid)

coords <- SpatialPixels(SpatialPoints(meuse.grid[,c('x',"y")]))
meuseg1 <- SpatialPixelsDataFrame(coords,meuse.grid)
meusedist1 <- SpatialPixelsDataFrame(coords,data=data.frame(meuseg1@data$dist))
meusedist2 <- SpatialPixelsDataFrame(coords,data=data.frame(meuseg1@data$dist*2))

spplot(meusedist1)
spplot(meusedist2)

我正在寻找的是两个图上的比例具有相同的值范围，因此图中的颜色应该缩放到最大比例尺（从 0 到 2）。这听起来并不复杂，我相信这是可能的，而且并不难，但由于某种原因，我找不到或想不出来。

谢谢！

Answer 1

尝试使用 at 属性修复颜色中断：

spplot(meusedist1, at = seq(0,2,.1))

或者，单个（共享）图例由以下人员创建：

meuseg1$dist2 = meuseg1$dist * 2
spplot(meuseg1, c("dist", "dist2"))

如何修复多个 spplots 中的颜色比例尺？

How do I fix a color scale bar in several spplots?

plot

r

sp