我正在尝试使用 Package graphics中的通用函数绘制一个 SpatialPoints 对象。图的范围应该正好是最外层数据点的大小。这是一个简单的示例，其中 delta x 与 delta y（最外层值）的比率为 1：
library(sp)
xydata <- as.matrix(cbind(c(1,1,2,2,1.5),c(1,2,2,1,1.5)))
xy_sp = SpatialPoints(xydata)
bbox(xy_sp)
# min and max for x and y coordinates are identical, i.e. apect ratio = 1
png("output.png", width = 500, height = 500, units = "px", type = "cairo" )
par(mar=c(0,0,0,0), xaxs = "i")
plot(xy_sp, xlim = c(1,2), ylim = c(1,2), pch = "X")
# the following lines should NOT be visible
abline(a = 1, b = 0); abline(a = 2, b = 0); abline(v = 1);abline(v = 2)
dev.off()
据我了解，上述脚本生成的图应该生成一个图形，其中只有 1 个点可见（坐标 1.5,1.5），但所有 4 个“斜线”都应该是不可见的。为什么不是这样？
