2010-12-15から1日間の記事一覧

時系列解析 Exponential smoothing 指数平滑

Exponential smoothing(Wiki記事) tmax<-1000 t<-1:tmax d<-rep(sort(runif(100)),10)*20000+rep(sort(runif(200)),5)*300000+t*3+(t-500)^2*1+rnorm(tmax)*50000 tsd<-ts(d,freq=12) plot(tsd) m<-HoltWinters(tsd) lines(fitted(m)[,1],col=2) Weighted av…

見えないパターンを見つけるためのメモ 続2