将第一行替换为NA，并在R中向下推一行

Question

如何将数据向下推一步或一行，并将第三列的第一行替换为NA，并使用r删除第三列最后一行？

我想要以下数据：

x   y   z
1   2    3
4   5    6
7   8    9 
to
x   y    z
1   2   NA
4   5    3
7   8    6

代码：

ave(data, data$z, FUN = function(x) c(diff(x), NA)

，给了我不同，而不是我想要的方式。

Answer 1

在基本R中，您可以执行：

transform(df, z = c(NA, head(z, -1)))
x y  z
1 1 2 NA
2 4 5  3
3 7 8  6

你也可以做：

library(tidyverse)
mutate(df, z = lag(z))