У меня есть два объекта ts
следующим образом:
> ts_forecast$mean
Sep Oct Nov
5 12.74330 13.44875 14.15419
И
> tail(ts_full$time.series[,2],n=3)
Jun Jul Aug
5 55.22149 55.64993 56.22575
ts_forecast$mean
Я получил от stlf
функции прогноза (package forecast)
. ts_full
- это не что иное, как случайная часть временного ряда и была получена как
ts_full <-stl(ts_historic,s.window='periodic')
ts_full$time.series[,2] <----Trend part
ts_full$time.series[,3] <-----Random Part and this was used in stlf forecast function.
Цель: я хочу добавить часть тренда к трем прогнозным значениям, полученным выше.
Простыми словами:
forecast_mean <-ts_forecast$mean + tail(ts_full$time.series[,2],n=3)
Но я получаю предупреждающее сообщение:
Warning message:
In .cbind.ts(list(e1, e2), c(deparse(substitute(e1))[1L], deparse(substitute(e2))[1L]), :
non-intersecting series
Я не хочу использовать mean(tail(ts_full$time.series[,2],n=3))
и добавлять его в ts_forecast$mean
. Что мне здесь не хватает? Это из-за разных месяцев для ts_forecast$mean
и ts_full
?
Оцените любую подсказку.