data(mscdata)
plot.seas.var(mscdata, var="max_t", col="tomato", id=1108447,
add.alt=c(5/9,32), ylab=c("Maximum temperature, C","F"))
abline(h=0)
plot.seas.var(subset(mscdata,precip>0), var="precip",
col="azure", id=1108447)
Run the code above in your browser using DataLab