Airports in NC

AE 12

library(tidyverse)
library(sf)
library(ggrepel)

First, load the data:

nc <- read_sf("data/nc_counties/", quiet = TRUE)
air <- read_sf("data/airports/", quiet = TRUE)
hwy <- read_sf("data/us_interstates/", quiet = TRUE)

Part 1: Counties, roads, airports

Then recreate the plot:

# add code here

Part 2: Counties with airports

Highlight counties that have airports:

# add code here