Estou usando esse shape file para fazer um mapa: link
library(rgdal)
library(ggplot2)
mapadf <- readOGR(dsn= "/rj_municipios", layer = "33MUE250GC_SIR")
mapadf <-fortify(mapadf)
O mapa fica como eu quero, então eu tento colocar a escala usando o pacote ggsn
library(ggsn)
country3 <-ggplot(data= mapadf, aes(x=long, y=lat, group=group)) +
geom_path() +
coord_map("mercator") +
xlim(-42.040,-41.973)+
ylim(-23.015, -22.94)
country3+ ggsn:: scalebar(mapadf,x.min = -42.040, x.max = -41.973,
y.min = -23.015, y.max = -22.94,
dist=5, model='WGS84',
st.dist=.05, transform = TRUE,
dist_unit = "Km")
Ai eu recebo:
Error in maptools::gcDestination(lon = x, lat = y, bearing = 90 * direction, :
subscript out of bounds
Warning message:
Removed 3 rows containing missing values (geom_text)
Tenho visto isso funcionar em todos os exemplos que eu encontro, comigo não funciona, alguém pode me ajudar?
xlim()
eylim()
do mapa e x.min, x.max, y.min e y.max dascalebar()
.