r - 使用 R 中的 spplot 设置 NA 值的颜色

Question

我正在尝试使用函数 spplot 绘制多边形数据来自 sp包，但我的数据框中有一些缺失值( NA )。当我绘制此数据框时，缺失值具有透明颜色。我想用黑色绘制它们。我怎样才能做到这一点？

library(sp)
spplot(TestData,12)

这是我的 TestData object

Answer 1

实现此目的的一种方法是使用 latticeExtra::layer_在标准 spplot 下用您喜欢的 NA 颜色绘制所有多边形.

library(latticeExtra)
spplot(TestData, 12, col.regions=heat.colors(101), at=seq(0, 4, length=100)) + 
  layer_(sp.polygons(TestData, fill='black'))

同样，如果你有栅格数据，你可以用 layer_ 做同样的事情。和 grid.rect :

library(raster)
library(latticeExtra)
r <- raster(matrix(runif(100), ncol=10))
r[sample(100, 10)] <- NA

spplot(r, col.regions=grey.colors, at=seq(0, 1, length=100)) + 
  layer_(grid.rect(0, 0, 2, 2, gp=gpar(fill = 'lightblue')))