Levelplot動畫R中的圖像標簽

Question

使用這里問題的示例，如何將years用作每個圖像的標題？

范例 ：

library(raster)
library(rasterVis)
library(animation)
library(classInt)

r <- raster(ncol=40, nrow=20)
r[] <- rnorm(n=ncell(r))
s <- stack(x=c(r, r*r, r*r*r, r*r*r*r))

classes <- classIntervals(values(r), n=5, style="fisher", precision = 3)
brks <- classes$brks
brks <- round(brks, 2)

saveGIF({
 for(i in c(1:nlayers(s))){
  l <- levelplot(s[[i]], colorkey=list(at=brks, labels=c(as.character(brks))), margin=FALSE,main=noquote(paste("",i)))
  plot(l)
 }
}, interval=0.2, movie.name="animation.gif")

行main=noquote(paste("",i))會將動畫中的每個圖像標記為1,2,3, etc.. main=noquote(paste("",i)) 。 但是，我想改用1919, 1920, 1921, etc.. 。 生成1919, 1920, 1921, etc..是否需要另一個for loop ？

以下不起作用：

main=paste(1919,i)
main=paste(1919:1923,i)

我實際的rasterbrick有100層

關於使用年份作為動畫中每個圖像的標題有什么建議嗎？

Answer 1

經過一些思考，這對我有用：

main=paste(" ", 1918+i, sep='')

假設我的數據始於1919 ，則將以1為步長的連續年份添加到每個圖像中。