I've been playing around with forecast, fable, and tibble, and was working through Rob Hyndman's examples HERE. When I get to the end of the "auscafe" example, the autoplot that comes out is ONLY for the forecast, not the original plot PLUS the forecast as shown (and expected).
What am I missing here?
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()