我在几个空气质量站之间做了一个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)。 这听起来并不复杂,我确信这是可能的,而不是那么难,但由于某种原因,我无法找到它或弄明白。
谢谢!
答案 0 :(得分:3)
尝试使用at
属性修复颜色中断:
spplot(meusedist1, at = seq(0,2,.1))
或者,单个(共享)图例由:
创建meuseg1$dist2 = meuseg1$dist * 2
spplot(meuseg1, c("dist", "dist2"))