# NOT RUN {
f <- flea[, 1:6]
animate(f, grand_tour(), display_xy())
# or in short
animate(f)
animate(f, max_frames = 30)
# }
# NOT RUN {
animate(f, max_frames = 10, fps = 1, aps = 0.1)
# }
Run the code above in your browser using DataCamp Workspace