r - 将数据叠加到背景图像上

Question

我最近发现使用 Tableau Public 使用背景图像和 map 数据是多么容易。这是他们的过程website .如您所见，它相当简单，您只需告诉软件您想要使用什么图像以及如何定义坐标。

R 中的过程是否如此简单？最好的方法是什么？

Answer 1

JPEG

对于 jpeg 图像，您可以使用 read.jpeg()来自 rimage包裹。

例如:

anImage <- read.jpeg("anImage.jpeg")
plot(anImage)
points(my.x,my.y,col="red")
...

通过在下一个绘图命令之前设置 par(new=T)，您可以在背景图片上构建完整的绘图。 (见 ?par 及以下)

PNG

您可以使用 readPNG 上传的 PNG 图像来自 png包裹。与 readPNG ，您需要 rasterImage命令绘图(另请参阅帮助文件)。在 Windows 上，必须摆脱 alpha channel ，因为到目前为止 Windows 无法处理每像素 alpha。 Simon Urbanek 非常友善地指出了这个解决方案:

img <- readPNG(system.file("img", "Rlogo.png", package="png"))
r = as.raster(img[,,1:3])
r[img[,,4] == 0] = "white"

plot(1:2,type="n")
rasterImage(r,1,1,2,2)

GIF

对于 gif 文件，您可以使用 read.gif来自 caTools .问题是这是旋转矩阵，所以你必须调整它:

Gif <- read.gif("http://www.openbsd.org/art/puffy/ppuf600X544.gif")

n <- dim(Gif$image)
image(t(Gif$image)[n[2]:1,n[1]:1],col=Gif$col,axes=F)

要绘制此图像，您必须正确设置标准，例如:

image(t(Gif$image)[n[2]:1,n[1]:1],col=Gif$col,axes=F)
op <- par(new=T)
plot(1:100,new=T)
par(op)