r - 一系列数据开始时的滚动方式和应用方式

Question

我想对数据集中的前4个值进行滚动平均。但是，一开始，由于没有4个值，因此我想做1/2/3个观测值的滚动平均值。我该怎么做呢？

 library(zoo)
 df= data.frame(a=c(1,2,3,4,5))
 df$answer = rollapply(df$a, 4,mean)
 #help

例如，第1行的值为1，第2行的值为(1 + 2)/2=1.5，第3行的值为6/3 = 2。

我想进行4个周期的滚动平均值，但是在少于几个月的周期中，我想计算允许的最大周期的平均值。

Answer 1

对partial=TRUE使用正确的权利，即rollapplyr(..., partial=TRUE)或rollapply(..., align = "right", partial=TRUE)。在这里，我们使用rollapplyr:

rollapplyr(df$a, 4, mean, partial = TRUE)