绘图时光栅避免空白

Question

我有一个图像，我只想绘制左下角为0,0的100 * 100正方形。当我使用以下命令时。为什么在裁切后的图像周围出现空白？如何避免这种情况并确保获得100 * 100的精确图像？

如果您想重复我的示例，则可以使用第1行上的任何图像（前提是该图像大于100 * 100像素）

r <- raster("C:/Users/nnnn/Desktop/geo.jpg")
vector= getValues(r)
plot(r)
r


par(mar=c(0,0,0,0))
par(oma=c(0,0,0,0))
par(mai=c(0,0,0,0))
par(omi=c(0,0,0,0))
plot(r,xlim=c(0,100),ylim=c(0,100),legend=FALSE,axes=FALSE)

Answer 1

地图的长宽比通常保持不变。打印到文件时可以使用宽度/高度。您可以手动调整标准设备的大小，但也可以执行以下操作：

library(raster)
r <- raster(nrow=240, ncol=320)
values(r) <- 1:ncell(r)
dev.new(height=0.91*nrow(r)/50, width=1.09*ncol(r)/50)
plot(r, legend=FALSE)