R 滞后和函数

我知道如何处理滞后差异：

delX = diff(x)

但我知道的唯一一种计算滞后金额的方法是：

sumY = apply(embed(c(0,y),2),1, sum)

---

是否有一个函数可以接受滞后和？这种方式（或以其他方式滑动索引）不是很直观。

您正在寻找的是

过滤器

：

x <- 1:10
filter(x, filter=c(1,1), sides=1)
# [1] NA  3  5  7  9 11 13 15 17 19

---

您正在查找

过滤器
：

x <- 1:10
filter(x, filter=c(1,1), sides=1)
# [1] NA  3  5  7  9 11 13 15 17 19

还有两个选择：

x <- 1:10
x + dplyr::lag(x)
# [1] NA  3  5  7  9 11 13 15 17 19
x + data.table::shift(x)
# [1] NA  3  5  7  9 11 13 15 17 19

x还有两个选项：

x <- 1:10
x + dplyr::lag(x)
# [1] NA  3  5  7  9 11 13 15 17 19
x + data.table::shift(x)
# [1] NA  3  5  7  9 11 13 15 17 19

x我认为举个例子会很有帮助。“滞后金额”的含义对我来说并不明显。也许你只是想要
rowsumes
那种
embed
的东西？下面所有的答案都很好，谢谢！我认为举个例子会有帮助。“滞后金额”的含义对我来说并不明显。也许你只是想要
rowsumes
那种
embed
的东西？下面所有的答案都很好，谢谢！
head
和
tail
功能似乎最直观。谢谢。
head
和
tail
功能似乎最直观。谢谢