[R-es] Añadir escala a un mapa

[Marcos Bermejo]

Hola a tod en s,

Este es el código principal que utilizo para diseñar mi zona de estudio (cuenca):

png("mapa_zona_estudio.png", units="in", width=9, height=8.5, res=300)

# Vamos a pintar los distintos instrumentos de medida sobre el mapa (junto con éste) y añadimos leyenda
ggmap(mapa, extend='device', legend="left", base_layer=ggplot(datos, aes(x=lon, y=lat))) +
  geom_point(data=datos, aes(shape = INSTRUMENTACIÓN, color=INSTRUMENTACIÓN, fill=INSTRUMENTACIÓN), size=7.5) +
  geom_text(data=coord.geog[1:7,], aes(x=coord.geog$lon[1:7], y=coord.geog$lat[1:7], label=nombres.pluvio, hjust=0.2, vjust=1), size=5.2) +
  scale_shape_manual(values=c(21,24,22,23)) +
  geom_polygon(aes(x=long, y=lat, group=group), data=area.fort, colour="black", fill="brown", alpha=0.15, size=0.5, linetype=5) 

dev.off()


Mi duda es:

¿Cómo puedo añadir una escala en km a esa imagen (mapa)?

Gracias de antemano,

Saludos,

Marcos
 		 	   		  
	[[alternative HTML version deleted]]