geom_text() re-renders every frame in animation if there are values outside of bounds

I've found that when using animation in a ggplot object that has a limited view using scale_y_continuous(), only a (seemingly random) set of the visible text values rerender on every frame. Gif and reprex below.

text_data <- tibble::tribble(
  ~text,~x,~y,
  "test1",1,1,
  "test2",1,2,
  "test3",2,1,
  "test4",2,2
)

point_data <- tibble::tribble(
  ~x,~y,
  1,1,
  2,1,
  3,1,
  1,2,
  2,2,
  3,2
)

p <- ggplot() +
  geom_text(aes(x = x,y = y,label = text),data = text_data) +
  geom_jitter(aes(x = x,y = y,frame = x,color = y),data = point_data) +
  scale_y_continuous(limits = c(0,1.5)) #view limited to 1.5 and thus does not show the text_data observations in y position of 2

ggplotly(p) %>% 
    animation_opts(redraw = F,frame = 2000,transition = 2000)

Führen Sie den bereitgestellten R-Reprex mit ggplotly und dem begrenzten Bereich von scale_y_continuous() aus, um das Animationsverhalten zu reproduzieren. Verfolgen Sie den Rendering-Pfad der ggplotly-Animation für geom_text-Werte außerhalb der Grenzen; abgeschlossen ist die Aufgabe, wenn sichtbarer Text über die Frames hinweg stabil bleibt, statt wiederholt neu gerendert zu werden.