Adding scale bar to ggplot map

Question

I\'ve produced this map in ggplot2:

library(maptools); library(ggplot2)
data(wrld_simpl)
world <- fortify(wrld_simpl)
worldUk <- subset(wo         


        

Answer 1

Another option is annotation_scale from the ggspatial package. Some more hints on this blog post.

library(ggplot2)
library(maptools)
data(wrld_simpl)

world_sf <- sf::st_as_sf(wrld_simpl)
worldUk <- subset(world_sf, NAME == 'United Kingdom')

Plot the layer and add the scale bar.

library(ggspatial)

ggplot() +
  geom_sf(data = worldUk) +
  annotation_scale()