r - R 中前三个值的移动平均值

Question

在 zoo 包中有一个名为 rollmean 的函数，它使您能够制作移动平均线。 rollmean(x,3)将取下表中的上一个、当前和下一个值(即 4、6 和 2)。这显示在第二列中。

x   rollmean    ma3
4       
6   4.0 
2   4.3 
5   3.0         4.0
2   6.3         4.3
12  6.0         3.0
4   6.0         6.3
2               6.0

我想完成同样的工作，但通过平均第四行中的前 3 个值。这显示在第三列中。任何人都可以告诉我有助于实现此目的的函数的名称吗？

Answer 1

您可以使用 rollmean ，但设置 align='right' .或者你可以使用 rollmeanr ，其中有 align='right'作为默认值。

ma3 <- rollmeanr(x[,1],3,fill=NA)

...但你仍然需要滞后结果。另一种解决方案是使用 rollapply带有 width 的列表争论:

ma3 <- rollapplyr(x[,1],list(-(3:1)),mean,fill=NA)