HoltsWinters法

時系列解析

HoltsWinters法

 ff2<-ts(ff[!is.na(ff)],frequency=12,start=c(2006,11))
 hol<-HoltsWinter(ff2)
 plot(c(ff2,predict(hol,6)))
  points(c(ff2),col=2)