请参阅R中的相关行

Question

我知道这个答案必须在那里，但我无法弄清楚如何说出问题。

我想计算我的data.frame中的值之间的差异。

f <- data.frame(year=c(2004, 2005, 2006, 2007), value=c(8565, 8745, 8985, 8412)) 

    year value 
1 2004 8565 
2 2005 8745 
3 2006 8985 
4 2007 8412 

这样：：

从这个

year value diff 
1 2004 8565 NA 
2 2005 8745 180 
3 2006 8985 240 
4 2007 8412 -573 

但我不知道如何有一个（即上一年的本年度负值的值）导致从另一行创建的一行。任何帮助？

感谢， 汤姆

Answer 1

有许多不同的方法可以做到这一点，但这里有一个：

f[, "diff"] <- c(NA, diff(f$value)) 

更一般地，如果你想指的是相行，你可以使用lag()或做它直接与指标：

f[-1,"diff"] <- f[-1, "value"] - f[-nrow(f), "value"] 

Answer 2

使用diff功能

f <- cbind(f, c(NA, diff(f[,2]))) 

Answer 3

如果year列没有排序，那么你可以使用match：

f$diff <- f$value - f$value[match(f$year-1, f$year)]