我想对示例数据执行以下简单计算
a<-seq(1:10)
现在，是否有内置函数，它返回一个向量：(a[1]+a[2],a[3]+a[4],...,a[9]+a[10])。注意我可以使用for循环或使用rollapply（并删除一些元素）来实现它。但是，我想知道到目前为止我还不知道是否有内置函数。
答案 0 :(得分：6)
这个怎么样？
a[c(T,F)] + a[c(F,T)]
答案 1 :(得分：1)
rollapply可以直接的方式做到这一点：
library(zoo)
rollapply(a, 2, by = 2, sum)