Выберите один график прогноза с помощью fable::autoplot

Question

Я использую пример данные из прогнозирования: Принципы и практика учебник раздел на моделях ВДПА здесь , чтобы сделать прогноз участков с использованием fable упаковка.

Я хотел бы иметь возможность выбрать один сюжет из тех, что были возвращены autoplot. Например, как в приведенном ниже коде выбрать и отобразить график только для? Я также хотел бы иметь доступ к значениям точек прогноза и верхним и нижним границам для модели с помощью Income в качестве переменной ответа.

Когда я пытаюсь просмотреть результаты вызова, я получаю сообщение «ОШИБКА при расширенном отображении объекта», поэтому я не вижу, как разделить этот объект на подмножество. Это может быть связано с тем, что я провожу этот анализ на Deepnote (например, в записной книжке Jupyter), я не уверен. Но, возможно, фильтрация, выбор или подмножество каким-либо образом до или после вызова forecast() даст мне данные и сюжет, который я ищу.

      library(fpp3)
fit <- us_change %>%
  model(
    aicc = VAR(vars(Consumption, Income)),
    bic = VAR(vars(Consumption, Income), ic = "bic")
  )
fit %>%
  select(aicc) %>%
  forecast() %>%
  autoplot(us_change %>% filter(year(Quarter) > 2010))