r - 返回 NA 大于设定值的名称向量

Question

我想为少于 3 个 NA 的列创建列名向量。这是我的数据以及到目前为止我尝试过的内容：

df <- data.frame("A" =  c(1,3,4,6,NA,3,NA),
           "B" = c(2,4,5,6,7,8,9),
           "C" = c(3,4,NA,NA,2,3,NA))

NA.list <- map(df, function (x) sum(is.na(x))>=3)

我想创建一个与此类似的输出：

names <- c("A", "B")

有什么想法吗？

标签： rfunctiondataframeiterationpurrr

Answer 1

一个简单的解决方案

colnames(df[colSums(is.na(df)) < 3])

[1] "A" "B"