Я использую OpenStreetMap для генерации карт, которая отлично работает.Но я не смог найти способ правильно добавить масштабную линейку и стрелку на север.Я попробовал ggsn, но, как показывает мой пример, ggsn кажется несовместимым с automap ().У Prettymapr были похожие проблемы.
library(OpenStreetMap)
library(ggsn)
lon <- c(9.92,11.032)
lat <- c(49.4,50.1)
map <- openmap(c(lat[1],lon[1]),c(lat[2],lon[2]),zoom=9,type='osm')
map <- openproj(map, projection="+proj=longlat +datum=WGS84")
autoplot(map)
autoplot(map) + ggsn::scalebar(location="bottomright",y.min=-49.4, y.max=-49.45,
x.min=10.6, x.max=10.8, dist=.1, dd2km= TRUE, model='WGS84',
st.dist=.04)
Заранее спасибо.