ETS 대 계절형 naive

이번에는 20년치 cement 데이터(분기별 시멘트 생산량)에 대해 4스텝 앞을 예측하는 시계열 교차 검증을 사용해 ETS 예측과 계절형 naive 예측을 비교해 보겠습니다. 실행에 시간이 걸리므로, 작업 공간에는 짧게 줄인 cement 시리즈가 제공됩니다.

tsCV()의 두 번째 인수는 forecast 객체를 반환해야 하므로, 모델을 적합하고 예측을 반환하는 함수가 필요해요. 다시 살펴보면:

> args(tsCV)
function (y, forecastfunction, h = 1, ...)

이 연습에서는 이미 존재하는 예측 함수와 함께 여러분을 위해 만들어 둔 함수를 사용합니다. 기억하세요, 때로는 단순한 방법이 더 정교한 방법보다 잘 작동하기도 해요!

ETS 예측을 반환하는 함수 fets()는 미리 작성되어 있어요.
예측 지평을 4로 두고 cement 데이터에 대해 ETS와 계절형 naive 두 방법 모두에 tsCV()를 적용하세요. e1과 e2의 예측 함수 인수에는 각각 새로 만든 fets와 기존의 snaive 함수를 사용하세요.
결과로 얻은 4-스텝 오류의 MSE를 계산하고 누락값을 제거하세요. MSE 계산식은 제공되어 있지만, 두 번째 선택적 인수는 비워 두었어요(이전에도 사용해 보셨죠).
가장 좋은 MSE를 bestmse로 저장하세요. 이전 단계에서 가장 좋은 MSE를 생성하는 전체 코드 한 줄을 그대로 복사해 사용해도 됩니다.