1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32
| tsDonnees=ts(test,start=2011, frequency=4)
->
Qtr1 Qtr2 Qtr3 Qtr4
2011 16.18956 13.90731 14.21393 14.43553
2012 16.12556 15.20311 14.35645 16.03054
2013 16.38157 15.73661 14.95160 17.04273
2014 17.16549 16.57543 14.93921 15.40673
HW_Donnees=HoltWinters(tsDonnees, seasonal=c("additive"))
Holt-Winters exponential smoothing with trend and additive seasonal component.
->
Call:
HoltWinters(x = tsDonnees, seasonal = c("additive"))
Smoothing parameters:
alpha: 0
beta : 0
gamma: 0.05419708
Coefficients:
[,1]
a 16.67929289
b 0.18326698
s1 1.07177196
s2 -0.03041199
s3 -0.59935282
s4 -0.35665660 |
Partager