# NOT RUN {
# Fail gracefully if any resources are not available
try({
library(PWFSLSmoke)
raw <- airsis_createRawDataframe(startdate = 20160901,
provider = 'USFS',
unitID = '1033')
raw <- raw_enhance(raw)
rawPlot_timeseries(raw, tlim = c(20160908,20160917))
}, silent = FALSE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab