fusion - Fusion de deux colonnes en une dans R

97

y <- c(1, 2, NA, NA, 5) z <- c(NA, NA, 3, 4, 5) coalesce(y, z)  [1] 1 2 3 4 5 

83

library(tidyr)  df[is.na(df)] = '' unite(df, new, A:B, sep='') #  ID new #1  1   3 #2  2   2 #3  3   4 #4  4   1 

72

df$New<-rowSums(df[, c("A", "B")], na.rm=T) df<-df[, c("ID", "New")] 

67

New <- do.call(pmax, c(df1[-1], na.rm=TRUE)) 

New <-  df1[-1][cbind(1:nrow(df1),max.col(!is.na(df1[-1])))] d1 <- data.frame(ID=df1$ID, New) d1 #  ID New #1  1   3 #2  2   2 #3  3   4 #4  4   1