在 R (zoo) 中对后视数据滚动应用时间序列

Question

我想使用动物园函数 rollapply 在时间序列上应用函数(例如平均值)，但只使用最后 N 个已知点。例如:
x = zoo(c(1,2,3,4), order.by=c(10,11,12,13))rollmean(x,2)
产生:

10 11 12

1.5 2.5 3.5

我想制作一个系列，它的日期条目为 11、12、13，值为 1.5、2.5、3.5。这些值似乎正确，但 rollmean 输出的日期似乎与我想要的不符。我有点担心只是使用 time(x)<- 将我想要的日期分配给动物园对象因为我不确定 rollapply 是否真的在做正确的事情。一如既往地感谢帮助。

Answer 1

指定 align="right"或者只是使用 rollmeanr (尽管仅在最近版本的动物园中)。

> rollmean(x,2,align="right")
 11  12  13 
1.5 2.5 3.5
> rollmeanr(x,2)
 11  12  13 
1.5 2.5 3.5