Animated plots in R and LaTeX

[This article was first published on Research tips » R, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

I like to use animated plots in my talks on functional time series, partly because it is the only way to really see what is going on with changes in the shapes of curves over time, and also because audiences love them! Here is how it is done.

For LaTeX, you need to create every frame as a separate graphics file. Here is an example. First the R code:

library(demography)
nyears <- length(fr.mort$year)
for(i in 1:nyears)
{
    pdf(paste("figs/frmale",i,".pdf",sep=""),height=4,width=6.5)
    x <- fr.mort
    if(i>1)
        x$rate$male[,1:(i-1)] <- NA
    lines(x,series='male',lwd=2,col=1)
    dev.off()
}

This creates a series of pdf files in the figs directory, named frmale1.pdf, …, frmale191.pdf.  In the LaTeX file, you need to load the animate package. Then the following command will do the magic:

centerline{animategraphics[controls,buttonsize=0.3cm,width=12.5cm]{6}{"frmale"}{1}{191}}

This is how the graph on slide 2 of this presentation was produced.

For web usage, it is better to produce an animated gif version in R:

library(animation)
library(demography)
nyears <- length(fr.mort$year)
makeplot <- function(){
for(i in 1:nyears)
{
    x <- fr.mort
    if(i>1)
        x$rate$male[,1:(i-1)] <- NA
    lines(x,series='male',lwd=2,col=1)
}
}
oopt = ani.options(interval = 0, nmax = nyears)
saveMovie(makeplot(),interval = 0.1, width = 580, height = 400)
ani.options(oopt)

Click the graph below for the animated version.

For an explanation of the colours, see my rainbow plot paper.

The animation package for R also allows graphics to be saved in other formats. See AniWiki for some examples of animations.

To leave a comment for the author, please follow the link and comment on their blog: Research tips » R.

R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

Never miss an update!
Subscribe to R-bloggers to receive
e-mails with the latest R posts.
(You will not see this message again.)

Click here to close (This popup will not appear again)