kirillseva

R-STABLE> a <- data.frame(a=1:5, b=head(letters, 5))
R-STABLE> a
  a b
1 1 a
2 2 b
3 3 c
4 4 d
5 5 e
R-STABLE> b <- a[c(1,3,5),]
R-STABLE> b

kirillseva

library(animation)
library(gganimate)
library(ggplot2)
library(ggthemr)
library(magrittr)
library(tweenr)
library(reshape2)

## Configurable parameters
NUM_PEOPLE    = 45