R Studio：如何用第二列的相应行值替换空白值

Question

[R] 您好，对于我数据中的每一行，我都希望将 REAL_TIME_ARR 列中的 blanks 替换为 REAL_TIME_DEP 列中相应的行值。我似乎无法让它为我拥有的数百行工作。

> TwentyFourSeptTrainData
REAL_TIME_ARR  REAL_TIME_DEP
               08:38
08:40          08:41
08:45          08:46
09:00          09:02
               09:07
09:10          09:11
and so on and so on

所以我的目标是让我的数据看起来像这样：

  > TwentyFourSeptTrainData
REAL_TIME_ARR  REAL_TIME_DEP
08:38          08:38
08:40          08:41
08:45          08:46
09:00          09:02
09:07          09:07
09:10          09:11

谢谢

Answer 1

TwentyFourSeptTrainData$REAL_TIME_ARR <- ifelse(TwentyFourSeptTrainData$REAL_TIME_ARR == "",
                                                TwentyFourSeptTrainData$REAL_TIME_DEP,
                                                TwentyFourSeptTrainData$REAL_TIME_ARR)

结果：

TwentyFourSeptTrainData
REAL_TIME_ARR REAL_TIME_DEP
1         08:38         08:38
2         08:40         08:41
3         08:45         08:46
4         09:00         09:02
5         09:07         09:07
6         09:10         09:11

Answer 2

备选 dplyr 解决方案：

library(dplyr)
TwentyFourSeptTrainData <- TwentyFourSeptTrainData %>%
  mutate(REAL_TIME_ARR = case_when(REAL_TIME_ARR == "" ~ REAL_TIME_DEP,
                                   TRUE ~ REAL_TIME_ARR))

结果：

TwentyFourSeptTrainData
  REAL_TIME_ARR REAL_TIME_DEP
1         08:38         08:38
2         08:40         08:41
3         08:45         08:46
4         09:00         09:02
5         09:07         09:07
6         09:10         09:11

R Studio：如何用第二列的相应行值替换空白值

R Studio: How to replace the blank value with the corresponding row value of the second column

r

rows

rstudio

blank-line