r - ggplotly アニメーションに表示するデフォルトのフレーム

Question

で初期フレームを設定する方法を知っている人はいますggplotly()か?

4 点の初期状態は1:4で、スライダーは数字を追加しています-10:10。

このアニメーション化されたプロットがあるとしましょう:

library(ggplot2)
library(plotly)

add <- rep(seq(-10, 10, by = .5), each = 4)
x <- 1:4 + add

df <- data.frame(x = x, y = 1, add = add)

plot <- ggplot(df, aes(x, y)) + 
  geom_point(aes(frame = add),
             col = rep(c("yellow", "green", "red", "blue"), length(unique(add))),
             size = 5) +
  theme(axis.line.x = element_line(),
        panel.background = element_blank(), axis.title = element_blank(),
        axis.text.y = element_blank(), axis.ticks.y = element_blank())

ggplotly(plot)

x = -9:-6 (フレーム 1) ではなく、x = 1:4 (フレーム 21) でプロットを開始したいと考えています。

どうもありがとう！