r - 在精确位置绘制点的光栅对象

Question

我有一个要添加点的栅格对象。但是，当我更改绘图大小时，例如通过使其全屏显示，这些点会改变它们的位置。

有没有办法给他们准确的位置，而与地块大小无关？

可重现的代码：

r<- raster(nrows=10, ncols=10) r <- setValues(r, 1:ncell(r)) plot(r) points(x=-50,y=20) points(x=-50,y=-90)

我不允许发布图像。但是当我使设备变小时，较低的点会离开彩色区域，或者当我使设备变大时会更多地进入彩色区域。

干杯

Answer 1

这个问题在这里也暴露了：在 r 的栅格层上绘制空间点。

我试图通过创建一个 SpatialPointsDataFrame 来超越它：

r<- raster(nrows=10, ncols=10)
r <- setValues(r, 1:ncell(r))
plot(r)
points(x=-50,y=20)
points(x=-50,y=-90)


coor1<- data.frame(Lat=-50,Lon=20)


point1 <- SpatialPointsDataFrame(
  data.frame(coor1$Lon,coor1$Lat),
  data.frame('Landriano')
)

x11()
plot(r)
plot(point1, add=T)

我看到的唯一解决方案是，一旦将点重叠在栅格上，就不应更改绘图窗口大小。否则点将随机移动到某个地方......