r - 合并 R 中的多个向量以删除 NA

Question

例如，我有如下向量:

 a= c(1, NA, NA, 2, 3)
 b=c(NA, 1, NA, NA, NA)
 c=c(NA, NA, 5, NA, NA)

我想合并三个向量得到

  d=c(1,1,5,2,3)

有没有一种不用大量循环就可以做到这一点的方法？非常感谢:)

Answer 1

你可以试试

 rowSums(cbind(a,b,c), na.rm=TRUE)
 #[1] 1 1 5 2 3

或

mat <- cbind(a,b,c)
mat[cbind(1:nrow(mat),max.col(!is.na(mat)))]
#[1] 1 1 5 2 3

或者

ind <- which(!is.na(mat), arr.ind=TRUE)
mat[ind[order(ind[,1]),]]
#[1] 1 1 5 2 3