This limitation actually comes from the LaTeX command \includegraphics{}. It is not impossible to insert animations into LaTeX, e.g. you can use the LaTeX package 'animate'.
The R package 'animation' has a wrapper saveLatex() which can help you generate a PDF file containing animations, provided you have appropriate tools installed (mainly pdflatex and Acrobat Reader). Here is an example for your graphs: library(animation) saveLatex({ library(zoo) library(fImport) IBM <- yahooSeries("IBM", from = "2000-01-01") IBM.Close <- IBM[, "IBM.Close"] rng = range(time(IBM.Close)) Syr <- as.numeric(format(rng[1], "%Y")) Eyr <- as.numeric(format(rng[2], "%Y")) Smth <- as.numeric(format(rng[1], "%m")) for (yr in Syr:Eyr) { par(mfrow = c(4, 3)) Temp1 <- IBM.Close[which(format(time(IBM.Close), "%Y") == yr), ] Temp3 <- tapply(Temp1[, 1], as.yearmon(time(Temp1)), FUN = mean) for (i in Smth:length(Temp3)) { i <- ifelse(i < 10, paste(0, i, sep = ""), i) Date <- paste(i, yr, sep = "-") Temp2 <- IBM.Close[which(format(time(IBM.Close), "%m-%Y") == Date), ] plot(time(Temp2), Temp2, type = "l", main = paste(factor(as.numeric(i), labels = month.name[as.numeric(i)]), yr, sep = "-")) } } }, interval = 1, latex.filename = "IBM-2000-2010.tex") I still need to modify this function a little bit to adapt to Sweave, so that you can use the option 'results=tex' to insert animation chunks in real-time in Sweave. Regards, Yihui -- Yihui Xie <xieyi...@gmail.com> Phone: 515-294-2465 Web: http://yihui.name Department of Statistics, Iowa State University 2215 Snedecor Hall, Ames, IA On Fri, Nov 19, 2010 at 6:06 PM, Dirk Eddelbuettel <e...@debian.org> wrote: > > On 19 November 2010 at 13:13, cameron wrote: > | > | i have a time Series of IBM closing px from 1/1/2000 to today > | I want to graph the time serie by dividing the graph by year and month > | all the monthly graphs with the same year will go to one page. so from > | 1/1/2000 to 11/19/2010. i will have > | 11 pages, and each page will have 12 graphs (jan to dec) except for 2010. > | > | I am able to do it in R, but when i use sweave, I can only print the last > | page. > | any help would be greatly appreciated > > It's essentially an Sweave FAQ: you can only have one pdf (or ps) file per R > 'snippet' so you have to rethink your code logic a little. > > Dirk > > -- > Dirk Eddelbuettel | e...@debian.org | http://dirk.eddelbuettel.com > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. > ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.