library(tidyverse) library(sf) library(tidycensus) library(colorspace) library(scales) # useful on MacOS to speed up rendering of geom_sf() objects if (!identical(getOption("bitmapType"), "cairo") && isTRUE(capabilities()[["cairo"]])) { options(bitmapType = "cairo") } options(digits = 3) set.seed(123) theme_set(theme_minimal()) Run the code below in your console to download this exercise as a set of R scripts.