Autoplot 仅使用 R 中的时间序列寓言绘制 ETS 的预测

Question

我一直在玩弄预测，寓言，和tibble，并通过罗布海德门的例子正在这里。 当我结束“auscafe”示例时，出现的自动绘图仅用于预测，而不是原始绘图加上所示（和预期）的预测。

我在这里缺少什么？

library(fpp2)
library(tsibble)
library(fable)
data("auscafe")

# Make auscafe a tsibble and confirm 
cafe <- as_tsibble(auscafe)
cafe


# Take a look
autoplot(cafe)

# ETS model noodling after Hyndman's 2018 presentation  
# https://robjhyndman.com/seminars/isf-fable/

cafe %>% ETS(value) %>% summary

cafe %>% ETS(value) %>% forecast() %>% summary()

cafe %>% ETS(value) %>% forecast() %>% summary(level=90)

# See Hyndman slide 11: He gets the original series PLUS the forecast
# When I run this, I get a plot of ONLY the forecast, 
# i.e., 2008-07 to 2010-07

cafe %>% ETS(value) %>% forecast() %>% autoplot()

Answer 1

我还在 tidyverts/fable git repo 上发布了这篇文章，并得到了 Mitchell O'Hara-Wild 的出色回应：

自介绍以来，随着我们找出实现这些功能的最佳方式，该包经历了多次更改。

在演示时，fable 包只是预测包的包装器，因此 fable::ARIMA 将调用 forecast::auto.arima。 从那以后，ARIMA 方法从头开始重新实现，并且作为错误状态，目前不支持差异选择。 目前，集成顺序必须与模型特价一起指定。 例如，pdq(d=1) + PDQ(D=1) 将包括季节性和非季节性差异。 此功能将在不久的将来添加。

我们还改变了预测的工作方式。 预测现在只包含未来的预测值，因此不再包含用于训练模型的数据。 通过提供数据作为 autoplot 的第一个参数，可以包含预测的历史数据。

prison %>% ETS(count) %>% forecast() %>% autoplot(prison)