© 2018 - Analytics Link

Creating animated plots in R

November 29, 2017

R is renowned for it's amazing data visualisation capabilities.  Here we show you it's actually quite simple to create an animated plot, and save it as a GIF!

 

We'll be using the saveGIF function from the animation package, and using the persp function within a loop to create 200 plots which saveGIF stitches together into GIF format.

 

Here is the code, have a tinker with it and let us know any amazing creations you come up with!

 

if(!require(animation)) { 
  install.packages("animation"); 
  require(animation)}

 

saveGIF({
  par(bg = rgb(0.003921569,0.09411765,0.2117647,1))
  for(i in 1:200){
    x <- seq(0 + (i * 0.05), 1 + (i * 0.05), length = 25)
    y <- x
    f <- function(x, y) { cos(x * y) }
    z <- outer(x, y, f)
    persp(x, y, z, 
          theta = 45, 
          phi = 30, 
          expand = 0.5, 
          col = rgb(0,0.8823529,0.8980392,1), 
          box = F, 
          r = 0.1,
          main = paste(i, " / 200", sep = ""),
          col.main = "white")
  }
}, interval = 0.1, 
   ani.width = 550, 
   ani.height = 550, 
   movie.name = "myplot.gif"
)

 

 

As always, we hope you enjoyed this post - please do share using the social buttons below!

Share on Facebook
Please reload

Please reload

Recent Posts