Объединение значений в двух столбцах в один новый столбец в R

Question

Как я могу объединить два столбца, так что значение в одном столбце заменяет NA в другом столбце?

Исходный кадр данных

date1                         date2
2016-08-29 02:31:34            NA
NA                      2016-08-29 17:59:23

Фрейм данных после преобразования

date1                         date2                     Newdate
2016-08-29 02:31:34            NA                 2016-08-29 02:31:34 
NA                      2016-08-29 17:59:23       2016-08-29 17:59:23

Answer 1

Пытаться dplyr::coalesce(...)

Данные - примечание coalesce не работает с факторами

df <- read.table(text="date1,date2
2016-08-29 02:31:34,NA
NA,2016-08-29 17:59:23", header=TRUE, sep=",", stringsAsFactors=FALSE)

Решение

df$dates <- dplyr::coalesce(df$date1, df$date2)
                # date1               date2               dates
# 1 2016-08-29 02:31:34                <NA> 2016-08-29 02:31:34
# 2                <NA> 2016-08-29 17:59:23 2016-08-29 17:59:23

Answer 2

Попробуйте следующий код:

# Simulating your data
date1 <- c("2016-08-29 02:31:34", NA)
date2 <- c(NA, "2016-08-29 17:59:23")
df <- data.frame(date1, date2, stringsAsFactors = FALSE)

# Actual solution
Newdate <- df$date1 # Copy the values from date1
Newdate[is.na(df$date1)] <- date2[is.na(df$date1)] # Replace every position where date1 is NA.
df$Newdate <- Newdate # Create the new column
print(df)

Надеюсь, поможет!:)