library(AirMonitor)
# Hours at MODERATE or above
Carmel_Valley %>%
monitor_dailyThreshold("Moderate") %>%
monitor_getData()
# Hours at MODERATE or above with the 2024 updated NAAQS
Carmel_Valley %>%
monitor_dailyThreshold("Moderate", NAAQS = "PM2.5_2024") %>%
monitor_getData()
# Hours at UNHEALTHY or above
Carmel_Valley %>%
monitor_dailyThreshold("Unhealthy") %>%
monitor_getData()
Run the code above in your browser using DataLab