# NOT RUN {
library(PWFSLSmoke)
ws_monitor <- monitor_subset(
Northwest_Megafires,
monitorIDs = c('530470009_01', '530470010_01')
)
ws_monTidy <- monitor_toTidy(ws_monitor)
# }
# NOT RUN {
ws_monTidy2 <- monitor_toTidy(ws_monTidy)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab