Eu produzi este mapa emggplot2:

library(maptools); library(ggplot2)
data(wrld_simpl)
world <- fortify(wrld_simpl)
worldUk <- subset(world, id=="GBR")
ggplot() +
geom_path(aes(long, lat, group=group), data=worldUk, color="black", fill=NA) +
  coord_equal()

Usando o photoshop, adicionei uma barra de escala ao mapa. Como posso adicionar uma barra de escala semelhante usandoggplot2? Esta postagem adiciona uma barra de escala, mas a barra não se refere à distância:barra de escala e seta norte no mapa-ggplot2