r - 聪明的 diff() 用于 data.frames

Question

一个 data.frame 包含某个值的测量值和像这样记录它的时间

df <- data.frame(time=1:1000, v=sin(1:1000))

我绘制了v

library(zoo)
plot(x=(rollmean(df$time,k=2)), y=diff(df$v,k=2))

这种方法在某种程度上适用于小矩阵和 if k=2，但对于推导超过 5 个值diff(df$v, k=5)和许多列的更复杂的情况，它不是很方便。

有没有更好更灵活更直接的解决方案？

Answer 1

我不确定是否理解您的问题，但这样的事情可能会有所帮助

library(plyr)
numcolwise(diff)(df,lag)