r - 在 spplot 的最底层绘制 jpg 文件

Question

我正在创建房子的平面图，这是我现在拥有的：

• 一个 jpg 文件，它是平面图纸质副本的扫描版本
• 显示房子、房间和床的 3 个 shp 文件

我想出了如何使用 3 个 shp 文件创建一个 spplot sp.layout，现在我还需要在 spplot 的背面绘制 jpg。我该怎么做？谢谢。

Answer 1

Orcs包提供rgb2spLayout了将 RGB 光栅转换为格式的函数，该格式可用于函数sp.layout的参数spplot。

请看下面的代码：

library(raster)
library(sp)
library(Orcs)
library(rgdal)

b <- brick( system.file("pictures/Rlogo.jpg", package="rgdal"))
lout <- rgb2spLayout(b)

df <- data.frame(dat = rnorm(100, 50, 10),
                 x = rnorm(100, 100, 50),
                 y = rnorm(100, 100, 50))
coordinates(df) <- ~x+y

spplot(df, sp.layout = lout)

输出（注意颜色缩放）：