Skip to content

Instantly share code, notes, and snippets.

@charliejhadley
charliejhadley / synthetic-aesthetic.R
Last active July 9, 2022 06:45
synthetic-aesthetic.R
library(tidyverse)
library(rnaturalearthdata)
library(sf)
country_sf <- countries110 %>%
st_as_sf()
ggplot() +
geom_sf(data = country_sf,
aes(fill = lastcensus,