r - RcppRoll 窗口打开

Question

我一直在使用 RcppRoll 包进行滚动求和，但我想找到一个函数/选项，例如，它可以让我将这样的向量 [1 2 3 4 5]转换 [1 3 6 9 12]为窗口 3。

目前，我一直在使用 roll_sum，它返回 [NA NA 6 9 12]3 的窗口。

似乎使用类似的东西会起作用rollapplyr(x, 3, sum, partial=TRUE)，但这对于我最终需要在数百万行上运行的东西来说太慢了。

Answer 1

在输入的开头插入零：

width <- 3
roll_sum(c(numeric(width-1), 1:5), width)
## [1]  1  3  6  9 12