r - 每行哪些列不适用

Question

数据框“d”中的每行我想知道哪些列不包含 NA。我想要的输出是哪些列。有什么建议么？谢谢!

a <- c(1,3,4,5,NA)
b <- c(1,NA,NA,5,9)
c <- c(NA,3,4,5,3)

d <- data.frame(a,b,c)
d
  a  b  c
  1  1 NA
  3 NA  3
  4 NA  4
  5  5  5
 NA  9  3

想要的输出:

row1= column a,b
row2 = column a,c
row3 = column b,c

Answer 1

使用apply逐行:

cols <- names(d)
apply(!is.na(d), 1, function(x) toString(cols[x]))
#[1] "a, b"    "a, c"    "a, c"    "a, b, c" "b, c"