Блог

У меня есть следующий фрейм данных, в котором в столбце «stock» есть две разные записи:

проблеск (df_final_time_series)

 Rows: 396
Columns: 3
$ date  <date> 2004-01-01, 2004-02-01, 2004-03-01, 2004-04-01, 200...
$ stock <chr> "vtv", "vtv", "vtv", "vtv", "vtv", "vtv", "vtv", "vt...
$ price <dbl> 31.70592, 32.52995, 31.80250, 31.43529, 31.66834, 32...
  

Я создал график временных рядов со следующими кодами:

     df_final_time_series %>% 
  ggplot(aes(x=stock, y=price))  
  geom_line(aes(color = stock), size = 2)  
  geom_segment(aes(xend = stock, yend = price))  
  geom_label(aes(label = price)) 
  labs(title = "",
       subtitle = "Time-Series Performances of VTV and VUG",
       caption = "Source: Yahoo Finance")  
  gganimate::transition_reveal(as.Date(date))   
  ggthemes::theme_fivethirtyeight()
  

Этот код работает нормально. Сейчас я пытаюсь воспроизвести график с изменением года: ГГГГ в заголовке по мере изменения точки данных.

Я попытался реализовать transition_time (год) и несколько других вариантов, однако, столкнувшись с ошибкой, было 50 или более предупреждений (используйте warnings (), чтобы увидеть первые 50) Предупреждающие сообщения:

1: Не удается получить размеры таблицы графиков. Возможно, область графика не исправлена 2: объект «год» не найден 3: объект «год» не найден … 50: объект «год» не найден

     df_final_time_series %>% 
  ggplot(aes(x=stock, y=price))  
  geom_line(aes(color = stock), size = 2)  
  geom_segment(aes(xend = stock, yend = price))  
  geom_label(aes(label = price)) 
  transition_time(year) 
  labs(title = "Year: {year}",
       subtitle = "Time-Series Performances of VTV and VUG",
       caption = "Source: Yahoo Finance")  
  gganimate::transition_reveal(as.Date(date))   
  ggthemes::theme_fivethirtyeight()
  

Вместо {year} вы пробовали {frame_time} ? Это то, что показывают страницы справки gganimate. См. gganimate.com .