## Series: Count
## Model: ETS(A,N,N)
## Smoothing parameters:
## alpha = 0.3221247
##
## Initial states:
## l[0]
## 100646.6
##
## sigma^2: 87480760
##
## AIC AICc BIC
## 13737.10 13737.14 13750.07
## # A fable: 4 x 6 [1M]
## # Key: Animal, State, .model [1]
## Animal State .model Month Count .mean
## <fct> <fct> <chr> <mth> <dist> <dbl>
## 1 Pigs Victoria "ETS(Count ~ error(\"A\") +… 2019 Jan N(95187, 8.7e+07) 95187.
## 2 Pigs Victoria "ETS(Count ~ error(\"A\") +… 2019 Feb N(95187, 9.7e+07) 95187.
## 3 Pigs Victoria "ETS(Count ~ error(\"A\") +… 2019 Mar N(95187, 1.1e+08) 95187.
## 4 Pigs Victoria "ETS(Count ~ error(\"A\") +… 2019 Apr N(95187, 1.1e+08) 95187.
## <hilo[1]>
## [1] [76854.79, 113518.3]95
There is no seasonality to the data and has no trend. From 1970 to 1980, Iraq gradually increased in exports, then drastically declined close to 0 from 1993 to 1996 due to the recession. The exports drastically increased from 1997 to 1998, where it began its steady decline.
## [1] 12.31977
The ETS(A,A,N) model has a lower RMSE, which indicates the model forecast better than ETS(A,N,N).
## [1] 12.31977
## [1] 12.38392
I believe the ETS(A,A,N) forecast is best. The ETS(A,A,N) model attempted to follow a trend represented by the data whereas the ETS(A,N,N) model states the forecast will remain stagnant.
## <hilo[1]>
## [1] [13.99644, 63.35056]95
## # A tibble: 1 × 2
## .pred_lower .pred_upper
## <dbl> <dbl>
## 1 10.6 14.8
## <hilo[1]>
## [1] [13.6203, 64.37202]95
## # A tibble: 1 × 2
## .pred_lower .pred_upper
## <dbl> <dbl>
## 1 10.6 14.9
Simple Exponential Smoothing depicts the trend to remain stagnant. Holt’s method shows an increasing trend, similar to that of Damped Box-Cox, and Damped Log. It seems These methods have similar characteristics within the models. The Damped Holt’s method attempted to follow the flow in the trend by leveling off overtime. The Box-Cox and Log models seem to be increasing exponentially.
Multiplicative seasonality is necessary due to the variation of the seasonal pattern. With the trend increasing, the seasonal amplitude increases. A high amount of quarters predicted shows additive plateau at a certain point, whereas multiplicative propogates at a steady rate. From the RMSE, dampled multiplicative would be selected over multiplicative due to the slight less difference. This states the forecast was improved a little.
## # A tibble: 4 × 10
## .model .type ME RMSE MAE MPE MAPE MASE RMSSE ACF1
## <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 additive Trai… 0.00525 4.76 3.35 -4.69 10.9 0.600 0.628 0.0772
## 2 multiplicative Trai… -0.115 4.60 3.02 0.199 4.08 0.542 0.606 -0.0131
## 3 damped_additive Trai… 0.967 4.56 3.12 1.41 5.87 0.560 0.602 0.0393
## 4 damped_multiplica… Trai… 0.435 4.56 3.04 0.892 4.18 0.545 0.601 -0.0387
Multiplicative seasonality is necessary due to the variation of the seasonality. The seasonality amplitude increases as the trend increases overtime.
The multiplicative method has a RMSE less than that of damped multiplicative. Therefore, the multiplicative method would be chosen over the other methods.
## # A tibble: 2 × 12
## State Industry .model .type ME RMSE MAE MPE MAPE MASE RMSSE
## <chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 Northern T… Clothin… multi… Trai… -0.0128 0.613 0.450 -0.469 5.15 0.513 0.529
## 2 Northern T… Clothin… dampe… Trai… 0.0495 0.619 0.452 0.303 5.18 0.516 0.534
## # ℹ 1 more variable: ACF1 <dbl>
## # A tibble: 1 × 5
## State Industry .model bp_stat bp_pvalue
## <chr> <chr> <chr> <dbl> <dbl>
## 1 Northern Territory Clothing, footwear and personal a… multi… 10.7 0.380
## # A tibble: 1 × 5
## State Industry .model lb_stat lb_pvalue
## <chr> <chr> <chr> <dbl> <dbl>
## 1 Northern Territory Clothing, footwear and personal a… multi… 11.0 0.359
The RMSE of the multiplicative method is significantly lower than the SNAIVE model. Therefore, the multiplicative method is more appropriate.
## Joining with `by = join_by(State, Industry, `Series ID`, Month, Turnover)`
## # A tibble: 2 × 12
## State Industry .model .type ME RMSE MAE MPE MAPE MASE RMSSE
## <chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 Northern T… Clothin… multi… Trai… -0.0119 0.518 0.384 -0.446 5.21 0.420 0.427
## 2 Northern T… Clothin… SNAIVE Trai… 0.439 1.21 0.915 5.23 12.4 1 1
## # ℹ 1 more variable: ACF1 <dbl>
The multiplicative and SNAIVE forecast have a RMSE of 0.518 and 1.214, respectively. Using the ETS model on the STL decomposition on Box-Cox transformed data yielded a RMSE of 0.079, much lower than the previous metrics.
## # A tibble: 1 × 5
## State Industry .model bp_stat bp_pvalue
## <chr> <chr> <chr> <dbl> <dbl>
## 1 Northern Territory Clothing, footwear and personal a… multi… 12.8 0.234
## # A tibble: 1 × 5
## State Industry .model lb_stat lb_pvalue
## <chr> <chr> <chr> <dbl> <dbl>
## 1 Northern Territory Clothing, footwear and personal a… multi… 13.1 0.217
## Joining with `by = join_by(State, Industry, `Series ID`, Month, Turnover)`
## # A tibble: 1 × 12
## State Industry .model .type ME RMSE MAE MPE MAPE MASE RMSSE
## <chr> <chr> <chr> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
## 1 Norther… Clothin… "ETS(… Trai… -0.00401 0.0789 0.0618 -0.267 3.13 0.405 0.388
## # ℹ 1 more variable: ACF1 <dbl>