替换多列的 diff()

Question

diff() 计算指定滞后向量中值之间的差异。
是否有适用于两个向量的等效函数？例如，我有:

v1 = c(1, 2, 3, 4, 5, 3)
v2 = c(5, 4, 3, 2, 1, 0)

我需要计算滞后 1 处 v1 和 v2 的每个值之间的差异。那将是:

(2 - 5), (3 - 4), (4 - 3)... 

这可以通过在 2 个向量上使用 head()/tails() 组合来实现，但我想知道是否已经有一个函数可以做到这一点。

Answer 1

我知道没有基本函数可以执行此操作，但正如 gsk3 指出的 taRifx 包具有此功能。我建议不要调用一个包来做这么简单的事情:你可以这样做:

v1[-1] - v2[-length(v2)]

或者在 .Rprofile 中编写自己的存储函数

shift.diff <- function(x, y) x[-1] - y[-length(y)]
shift.diff(v1, v2)