我想按周对帧的每一列中的值求和。我可以做到这一点,但由于某种原因,总和不起作用:
> zoo.data <- zoo(data.frame(x=11:20,y=1:10),as.Date(1:10,origin="1970-01-01"))
> apply.weekly(zoo.data, mean)
x y
1970-01-04 12 2
1970-01-11 17 7
> apply.weekly(zoo.data, sum)
1970-01-04 1970-01-11
42 168
这是怎么回事?