# NOT RUN {
Jul <- monitor_subset(Northwest_Megafires,
tlim=c(2015070100,2015073123),
timezone='America/Los_Angeles')
Aug <- monitor_subset(Northwest_Megafires,
tlim=c(2015080100,2015083123),
timezone='America/Los_Angeles')
Methow_Valley <- monitor_join(Jul, Aug, monitorIDs=c('530470010_01','530470009_01'))
# }
Run the code above in your browser using DataLab