我正在尝试使用库rworldmap和rworldxtra获取R中Alpine区域的简单地图。然后,我将在地图中添加点以查找特定网站。
为了添加一个看起来更好的北向箭头和地图比例,我正在尝试使用函数north.arrow()和map.scale()来打包' GISTools'。 我想这个包是为美国开发的,为了绘制比例,它需要从/到脚的转换功能,我无法弄清楚如何使它以正确的比例工作......
以下是代码:
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...
答案 0 :(得分:2)
你告诉map.scale
条的长度是3.048公里(即ft2km(10000)
,但你还要以0.5为增量指定条形的4个分区,因此长度与您指定的分部和子部门的数量。
此外,没有必要使用ft2km
,我不确定它有什么影响。您在"Km"
函数中将单位指定为map.scale
,因此根据文档,长度应以公里数给出。
这对我来说非常好:
north.arrow(xb=7, yb=43, len=0.1, lab="N",cex.lab=0.8,col='gray10')
map.scale(7, 42.5,2,"Km", 2, 1)