gganimate con escalas cambiantes (límites de eje)

Me gustaría crear un gif usandogganimate, pero mis rangos de eje varían enormemente en un cuadro. Esto está causando que se compriman todos los fotogramas posteriores.

Enggplot2facetas, hay una opción para tenerscales="free". ¿Hay alguna manera de tener escalas libres en cada cuadro degganimate?

Aquí hay un ejemplo:

library(gapminder)
library(ggplot2)
library(gganimate)
theme_set(theme_bw())

p <- ggplot(gapminder, aes(gdpPercap, lifeExp, size = pop, color = continent,
                           frame = year)) +
  geom_point() +
  scale_x_log10()

gganimate(p)

Ahora movemos uno de los puntos de datos a algún valor extremo. Esto exprime los puntos entodos los posteriores no afectados marcos.

gapminder[1, "lifeExp"] <- 1000
gapminder[1, "gdpPercap"] <- 1e60

p <- ggplot(gapminder, aes(gdpPercap, lifeExp, size = pop, color = continent, 
                           frame = year)) +
  geom_point() +
  scale_x_log10()

gganimate(p)  # smooshed

Respuestas a la pregunta(1)

Su respuesta a la pregunta