R编程：如何计算数据框中两个单元格之间的差异并将其保存在新列中

Question

尝试学习R并坚持自相关示例。我想回归x中的差异与y的差异。我在数据框中有x和y，并希望将x2 - x1的差异保存在一个新列中，例如dx。我不知道该怎么做。

我有什么：

DATA1

x   y
5   3
8   9
3   1
1   5
.   .
.   .
.   .

我想得到什么：

data1.dif

x   y   dx   dy
5   3   NA   NA
8   9    3    6
3   1   -5   -8
1   5   -2    4
.   .    .    .
.   .    .    .

Answer 1

将diff与transform：

一起使用

dat <- read.table(text="x   y
5   3
8   9
3   1
1   5", header=T)


transform(dat, dx=c(NA, diff(x)), dy=c(NA, diff(y)))

产量：

  x y dx dy
1 5 3 NA NA
2 8 9  3  6
3 3 1 -5 -8
4 1 5 -2  4

从 dplyr 开始：

library(dplyr)

dat %>%
    mutate(dx=c(NA, diff(x)), dy=c(NA, diff(y)))

Answer 2

使用diff，并将NA粘贴到结果向量的开头。

e.g。

data1 <- read.table(text='  x y
1 5 3
2 8 9
3 3 1
4 1 5')

# diff calculates the difference between consecutive pairs of 
#  vector elements
diff(data1$x)
[1]  3 -5 -2

# apply diff to each column of data1, bind an NA row to the beginning,
#  and bind the resulting columns to the original df
data1.dif <- cbind(data1, rbind(NA, apply(data1, 2, diff)))
names(data1.dif) <- c('x', 'y', 'dx', 'dy')

data1.dif
  x y dx dy
1 5 3 NA NA
2 8 9  3  6
3 3 1 -5 -8
4 1 5 -2  4