# NOT RUN {
ws_monitor <- Northwest_Megafires
NMData <- ws_monitor %>%
monitor_subset(
stateCodes = "WA",
tlim = c(20150801, 20150831)
) %>%
extract_data()
monitor_subset(
stateCodes = "WA",
tlim = c(20150801, 20150831)
) %>%
extract_meta()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab