Me gustaría muestrear puntos de una distribución normal, y luego construir un diagrama de puntos uno por uno usando el gganimate
paquete hasta que el cuadro final muestre el diagrama de puntos completo.
Una solución que funcione para conjuntos de datos más grandes ~ 5,000 - 20,000 puntos es esencial.
Aquí está el código que tengo hasta ahora:
library(gganimate)
library(tidyverse)
# Generate 100 normal data points, along an index for each sample
samples <- rnorm(100)
index <- seq(1:length(samples))
# Put data into a data frame
df <- tibble(value=samples, index=index)
El df se ve así:
> head(df)
# A tibble: 6 x 2
value index
<dbl> <int>
1 0.0818 1
2 -0.311 2
3 -0.966 3
4 -0.615 4
5 0.388 5
6 -1.66 6
El diagrama estático muestra el diagrama de puntos correcto:
# Create static version
plot <- ggplot(data=df, mapping=aes(x=value))+
geom_dotplot()
Sin embargo, la gganimate
versión no lo hace (ver más abajo). Solo coloca los puntos en el eje xy no los apila.
plot+
transition_reveal(along=index)
Algo similar a esto sería ideal: Crédito: https://gist.github.com/thomasp85/88d6e7883883315314f341d2207122a1