require(devtools) require(plotly) devtools::load_all() station <- 1706 begin <- 1998 end <- 2008 download.ClimateData(station, begin, end, "hourly", "wget") cdata.Compile(station, begin, end, T)
plot.Climate(station, years=2013:2018, FUN=function(x, y=NA) {cdata.RollingMean(x, y, var=~TempC, back=24*30)})
plot.Climate(station, mode="Date", years=2018)
p <- plot.ClimateAnimation(station, years=2017, accumulate=24*30)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.