Использование функции view_follow в gganimate со статическими битами - PullRequest
Новая
       16

Использование функции view_follow в gganimate со статическими битами

0 голосов
/ 05 октября 2019

Следуя примеру, установленному в вики Я хотел бы создать анимацию с помощью функции view_follow и статических точек / линий / меток.

Проблема заключается вэтот view_follow работает, как и ожидалось, только после того, как статические линии / метки будут видны. 

library(gganimate)

airq <- airquality
airq$Month <- format(ISOdate(2004,1:12,1),"%B")[airq$Month]

# modified code 
ggplot(airq, aes(Day, Temp, group = Month)) + 
  geom_line() + 
  geom_segment(aes(xend = Day+1, yend = Temp), linetype = 2, colour = 'grey') + 
  geom_point(size = 2) + 
  geom_text(aes(x = Day+1.1, label = Month), hjust = 0) + 
  transition_reveal(Day) + 
  coord_cartesian(clip = 'off') + 
  labs(title = 'Temperature in New York', y = 'Temperature (°F)') + 
  theme_minimal() + 
  theme(plot.margin = margin(5.5, 40, 5.5, 5.5))+
  view_follow(aspect_ratio = (16/9))+ # add view_follow()
  geom_vline(xintercept = 15)+ #added static point
  geom_label(aes(x = 15, y = 45, label = "text"), hjust = 1) #add a label

Желаемое поведение будет для линии и метки, чтобы "появиться в поле зрения". Как мне это сделать?

...