我正在尝试阅读医院平面图（比.PNG形式的版本更高的分辨率版本）http://www.alfredicu.org.au/assets/Miscellaneous-Downloads/newicufloorplan.pdf
然后我可以在其上放置代表OHS事件的点。我的问题是我需要能够减少地图，以便我只查看区域的子集，因此x轴（表示A2页面的mm）为10：300，y轴为10 ：380
我已经读过数组和图，但不知道如何将这个图集。如果您可以建议如何更改绘图的尺寸，以便我可以“放大”地图的相关部分，将非常感激。
#Read PNG into raster array
r <- readPNG("ICU-map.png")
#Set up the plot area as A2 with mm as the dimensions
icu <-plot(0, type='n', main="ICU", xlab="x", ylab="y", xlim=c(0, 594), ylim=c(0, 420))
#Get the plot information so the image will fill the plot box, and draw it
lim <- par()
rasterImage(r, lim$usr[1], lim$usr[3], lim$usr[2], lim$usr[4])
grid()
lines(c(1, 1.2, 1.4, 1.6, 1.8, 2.0), c(1, 1.3, 1.7, 1.6, 1.7, 1.0), type="b", lwd=5, col="white")