如何在几个spplots中修复色标尺?

时间:2016-03-01 16:28:52

标签: r plot sp

我在几个空气质量站之间做了一个idw插值。对于最终的可视化,我想将我制作的所有图像折叠成GIF。一切正常,唯一的问题是每个图像中的值的比例都会发生变化,并且比例会随着值(min - max)而变化。 如何将颜色的比例设置为固定值?

以下是一些示例数据:

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)。 这听起来并不复杂,我确信这是可能的,而不是那么难,但由于某种原因,我无法找到它或弄明白。

谢谢!

1 个答案:

答案 0 :(得分:3)

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

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

或者,单个(共享)图例由:

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