Gostaria de provar pontos de uma distribuição normal e, em seguida, criar um gráfico de pontos, um por um, usando o gganimate
pacote até que o quadro final mostre o gráfico de pontos completo.
Uma solução que funcione para conjuntos de dados maiores ~ 5.000 - 20.000 pontos é essencial.
Aqui está o código que tenho até agora:
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)
O df fica assim:
> 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
O gráfico estático mostra o gráfico de pontos correto:
# Create static version
plot <- ggplot(data=df, mapping=aes(x=value))+
geom_dotplot()
No entanto, a gganimate
versão não possui (veja abaixo). Ele apenas coloca os pontos no eixo x e não os empilha.
plot+
transition_reveal(along=index)
Algo semelhante a este seria ideal: Crédito: https://gist.github.com/thomasp85/88d6e7883883315314f341d2207122a1