仅返回 R 中包含 NA 的列

Question

我有以下数据框:

i3<-c(1,1,1,1,2,2)
i2<-c(NA,1,1,1,2,2)
i1<-c(1,NA,2,4,5,3)
newdat1<-data.frame(i3,i2,i1)
print(newdat1)
  i3 i2 i1
1  1 NA  1
2  1  1 NA
3  1  1  2
4  1  1  4
5  2  2  5
6  2  2  3

我意识到这个解决方案非常简单，但我试图返回任何 NA 的所有列，以便最终结果如下所示:

  i2 i1
1 NA  1
2  1 NA
3  1  2
4  1  4
5  2  5
6  2  3

我发现下面的代码做相反的事情:

newdat1<-newdat1[, sapply(newdat1, Negate(anyNA)), drop = FALSE]

但我找不到我要找的东西。谢谢。

Answer 1

newdat1[!complete.cases(t(newdat1))]

输出:

  i2 i1
1 NA  1
2  1 NA
3  1  2
4  1  4
5  2  5
6  2  3