library(AirMonitor)
# Metadata
Camp_Fire %>%
monitor_pull("deploymentType") %>%
table()
# Data for a specific ID
Camp_Fire %>%
monitor_dailyStatistic(mean) %>%
monitor_pull("6bbab08e3786ef66_840060450006") %>%
round(0)
# Associated dates
Camp_Fire %>%
monitor_dailyStatistic(mean) %>%
monitor_pull("datetime")
Run the code above in your browser using DataLab