## extract those hours where there are at least 5 consecutive NOx
## concentrations above 500ppb
mydata <- selectRunning(mydata, run.len = 5, threshold = 500)
## make a polar plot of those conditions...shows that those
## conditions are dominated by low wind speeds, not
## in-canyon recirculation
if (FALSE) polarPlot(mydata, pollutant = "nox", type = "criterion")
Run the code above in your browser using DataLab