Wings away

These butterfly frames come from what the phone says is a 4K movie … this is just part of the frame, but even so, the weight of each picture is greater, so this might take a bit longer to load.

Click button at right or left to advance by frame:

Code

library(slickR)
## Using the slickR package, which wraps a javascript carousel library slick

butterfly_frame_filenames <- list.files("frames/", pattern=".jpg", full.names = TRUE)

slickR(butterfly_frame_filenames, height = 250, width='80%') +
  settings(dots = TRUE,
  infinite= TRUE,
  speed = 0,
  fade = TRUE,
  cssEase = 'linear')