#r #ggplot2 #graph-visualization #gganimate
#r #ggplot2 #график-визуализация #gganimate
Вопрос:
Это воспроизводимый пример анимированного сюжета, который я сделал:
library(tidyverse)
library(gganimate)
data.1 <-read.csv(text = "
Year, value
1970,0
1980,1500
1990,2300
2000,4000
2010,4200
2020,6000
")
ggplot(data = data.1 %>% mutate(Year=as.numeric(Year),
value=as.numeric(value)),
mapping = aes(x = Year,
y = value))
geom_line()
transition_reveal(Year)
Анимация в порядке, но я хотел бы остановить ее и не выполнять откат, когда она достигнет последнего года визуализации.
Возможно ли это сделать с transition_reveal
помощью?
Ответ №1:
При рендеринге gif-файла вы можете настроить loop = FALSE
следующим образом:
animate(myplot, renderer = gifski_renderer(loop = FALSE))