Annotating air quality

AE 03

Setup

library(tidyverse)
library(lubridate)
library(colorspace)
dch_2025 <- read_csv(
  here::here("data/ad_aqi_tracker_data-2025.csv"),
  na = c(".", "")
)

Durham-Chapel Hill AQI