library(AirMonitor)
monitor <-
Carmel_Valley %>%
monitor_filterDate(20160802, 20160803)
monitor_toCSV(monitor) %>% cat()
monitor_toCSV(monitor, includeData = FALSE) %>% cat()
monitor_toCSV(monitor, includeMeta = FALSE) %>% cat()
Run the code above in your browser using DataLab