Question

在R中工作时遇到问题
我在数据框（df）中有一个变量（X），看起来像这样

df$X
NA
12345
NA
NA
32409
NA
NA
NA
NA
NA
04598
NA
NA
NA

我需要执行以下操作：

如果X不是NA，请替换：
-X中的前一行，其值
-填写其余的行，直到达到下一个值

最终，它应该看起来像这样

我尝试使用for循环来完成第一部分（在上一行中填充），但似乎无法使它工作

for (x in df$X) {

x = df$X[x]  
y = x -1  
df$X[y] <-  ifelse(!is.na(x), x, NA)

}

非常感谢您的帮助！

Answer 1

这是使用dplyr和tidyr的方法：

library(dplyr)
df2 <- df %>%
  mutate(X = if_else(is.na(X), lead(X), X)) %>%
  tidyr::fill(X)