我正在尝试使用库 rworldmap 和 rworldxtra 获取 R 中高山地区的简单地图。然后,我将在地图中添加点以定位特定站点。
为了添加看起来更好的指北针和地图比例,我尝试了“GISTools”包中的函数 north.arrow() 和 map.scale()。我想这个包是为美国开发的,为了绘制比例尺,它需要一个从/到英尺的转换函数,我不知道如何让它以正确的比例工作......
这是代码:
library(rworldmap); library(rworldxtra); library(GISTools)
newmap <- getMap(resolution="high", projection=NA)
plot(newmap, xlim=c(5.7,16.6), ylim=c(46,46), asp=1.5, col="gray90")
north.arrow(xb=11.7, yb=45.4, len=0.1, lab="N",cex.lab=0.8,col='gray10')
map.scale(10, 45,ft2km(10000),"Km", 4, 0.5) #here is the headache...