我想对示例数据执行以下简单计算
a<-seq(1:10)
现在,有一个内置函数,该函数返回一个 vector :
(a[1]+a[2],a[3]+a[4],...,a[9]+a[10])
。注意,我可以使用for循环或rollapply
(并删除一些元素)来实现此目的。但是,我想知道是否有一个到目前为止尚不知道的内置函数。 最佳答案
zoo软件包中的rollapply
可以以一种简单的方式做到这一点:
library(zoo)
rollapply(a, 2, by = 2, sum)