聪明的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))

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

是否有更灵活，更直接的解决方案？

Answer 1

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

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