r - 为什么在带有 xts/zoo 的 R 中没有 apply.hourly？

Question

我想按小时平均值汇总数据。日常很简单:

apply.daily(X2,mean)

为什么没有每小时的功能？
我试过

hr.means <- aggregate(X2, format(X2["timestamp"],"%Y-%m-%d %H"))

并且总是在修剪参数时出错。
有没有类似于apply.daily的更简单的功能？如果我想汇总 5 分钟的平均值怎么办。
数据是每分钟的值:

"timestamp", value 
"2012-04-09 05:03:00",2
"2012-04-09 05:04:00",4
"2012-04-09 05:05:00",5
"2012-04-09 05:06:00",0
"2012-04-09 05:07:00",0
"2012-04-09 05:08:00",3
"2012-04-09 05:09:00",0
"2012-04-09 05:10:00",1

我正在使用 xts 和动物园。

Answer 1

尝试

period.apply(X2, endpoints(X2, "hours"), mean)

apply.daily只是上述内容的包装器:

> apply.daily
function (x, FUN, ...)
{
    ep <- endpoints(x, "days")
    period.apply(x, ep, FUN, ...)
}