knitr文档中的动画与ggplot数字

Question

我试图在我的knitr文档中使用以下块来创建pdf

<<animate_gg,fig.show='animate', eval=TRUE>>=
gg.list<-list()
for (w.it in w.vals){
sub.final.pts.lf.logical<-all.final.pts.lf$w %in% w.it
sub.final.pts.lf<- all.final.pts.lf[sub.final.pts.lf.logical,]
levels(sub.final.pts.lf$w)<- paste("w=",levels(sub.final.pts.lf$w))

g1<-ggplot(sub.final.pts.lf,aes(x=x,y=y,colour=pt.name))+geom_point(alpha = 1/5) +scale_shape(solid = FALSE)
gg.list<-c(gg.list,list(g1))
}
for (gg in gg.list){
gg  
}

但是这不会在乳胶中产生任何相应的部分.我假设问题是如果我gg 在括号内使用,R不会评估该行.下面用一个图创建动画

 {
g1<-ggplot(sub.final.pts.lf,aes(x=x,y=y,colour=pt.name))+geom_point(alpha = 1/5) +scale_shape(solid = FALSE)

}
g1 

如何使用所有创建的图创建动画？

Answer 1

基于网格的图形的常见问题解答(7.22) ：print(gg)