在R中按周汇总

Question

在R中，我经常按月汇总每日数据（zoo），使用以下内容：

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

有没有办法可以按周完成这个？

Answer 1

最简单的方法是使用apply.weekly中的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