r - 在 R 中按周聚合

Question

在 RI 中，经常按月聚合每日数据（在 a 中zoo），使用如下所示：

result <- aggregate(x, as.yearmon, "mean", na.rm=TRUE)

有没有办法可以按周做到这一点？

Answer 1

最简单的方法是使用apply.weekly函数 from xts。

> apply.weekly(zoo(1:10, as.Date("2010-01-01") + 1:10), mean)
2010-01-03 2010-01-10 2010-01-11 
         3         42         10