R中的diff函数返回适当的滞后和迭代差异.
x = c(1, 2, 1, 3, 11, 7, 5)
diff(x)
# [1]  1 -1  2  8 -4 -2
diff(x, lag=2)
[1]  0  1 10  4 -6
反正有没有定制这个,以便我们可以使用除差异之外的功能?例如,总和:
itersum(x)
# 3 3 4 14 18 12
r ×1