# NOT RUN {
# Heavy-weight download!
# }
# NOT RUN {
pc_bel <- gisco_get_postalcodes(country = "BE")
library(ggplot2)
ggplot(pc_bel) +
geom_sf(color = "gold") +
theme_bw() +
labs(
title = "Postcodes of Belgium",
subtitle = "2020",
caption = paste("(c) European Union - GISCO, 2021,",
"postal code point dataset",
"Licence CC-BY-SA 4.0",
sep = "\n"
)
)
# }
Run the code above in your browser using DataLab