如何修复几个 spplot 中的颜色比例尺？答案

【问题标题】：How do I fix a color scale bar in several spplots?如何修复几个 spplot 中的颜色比例尺？
【发布时间】：2016-06-14 04:23:17
【问题描述】：

我正在几个空气质量站之间进行 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）。这听起来并不复杂，我确信它是可能的，也不是那么难，但由于某种原因，我找不到或弄不明白。

谢谢！

【问题讨论】：

标签： r plot sp

【解决方案1】：

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

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

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

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

【讨论】：