powered by
cfly_animate(cf, clusters = seq_along(cf$clusters), pause = 1, print = TRUE, max_iterations = 100)
# Press Ctrl-Break or Ctrl-C to exit if (interactive()) { o <- olive_example() cfly_animate(cfly_clarify(o), max = 5) close(o) }
Run the code above in your browser using DataLab