# NOT RUN {
library(AirSensor)
setArchiveBaseUrl("http://data.mazamascience.com/PurpleAir/v1")
# Reference an older 'pas' before this sensor was dropped
pas <- pas_load(20190901, archival = TRUE)
pat <- pat_load(
label = "SCNP_20",
pas = pas,
startdate = 20190411,
enddate = 20190521
)
pat_multiPlot(pat)
# }
Run the code above in your browser using DataLab