R Plotly анимация - начальный кадр

Question

Как я могу сделать сюжетную загрузку анимации на финальном кадре. То есть, когда график загружается, я бы хотел, чтобы он загружался в этот последний кадр (например, 2017). По умолчанию он загружается в первый кадр (например, 1960). Позже, когда человек нажимает кнопку воспроизведения, анимация должна начинаться с первого кадра (например, 1960).

 animation_opts(frame = frame, transition = 0, redraw = FALSE) %>% 
  animation_slider(currentvalue = list(prefix = "Year"))

Answer 1

Это не полный ответ, но поскольку другого ответа пока нет, я решил опубликовать лучшее, что я могу сделать, и, может быть, у кого-то еще есть идеи, чтобы улучшить его?

Есть функция animation_slider(), который принимает аргумент active, который может установить активный кадр на слайдере. Однако это не меняет активный кадр на графике... Таким образом, идея состоит в том, чтобы добавить кадр 0 (как также упоминается Sixiang.Hu в комментариях) и объединить его с активным кадром. Недостатком этого решения, очевидно, является то, что всегда есть кадр 0, когда вы возвращаетесь на слайдер анимации.

# sample data
df = data.frame(a=seq(1,20),b=seq(1,20),frame=seq(1,20))

# add initial frame
init_frame = 10
df = rbind(df[df$frame==10,],df)
df$frame[1]=0

library(plotly)
plot_ly(df,x=~a,y=~b,frame=~frame) %>% animation_slider(active=init_frame)