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)
は、あまり便利ではありません。
より柔軟で直接的な解決策はありますか?