R 中包含 NA 的列名

Column names that contain NAs in R

我有一个大型数据框,每行包含 900 个变量。我正在尝试编写一个函数,该函数为我提供每行包含 NA 的每一列的名称。

例如:

x-> 

               mpg  cyl disp hp draw wt
Mazda RX4     21.0   6  160 110 NA   2.62
Mazda RX4 Wag 21.0   6  NA  110 3.90 NA 
Datsun 710    22.8   4  NA  93  NA   NA 

我想要一个函数 return:

Mazda RX4:   "draw"
Mazda RX4 Wag: "disp", "wt"
Datsun 710: "disp","draw","wt"

运行 applycolnames(x) 到 select 行。可能会得到一个列表,因为结果参差不齐。

 apply(x, 1, function(x2) colnames(x)[ is.na(x2) ] )
$`Mazda RX4`
[1] "draw"

$`Mazda RX4 Wag`
[1] "disp" "wt"  

$`Datsun 710`
[1] "disp" "draw" "wt"