数据框中的所有列不是Nan的行

Question

我有一个5000行和400列的数据框。在每一行中，大多数细胞是NaN。对于每一行，我想找到不是NaN的列，然后在数据帧中取这些列进行一些处理。有一个简单的方法来做到这一点。我能想到的最好的是

data [ i, ! is.nan(data[i,] ) ] 

表示第i行。但这会引发错误。

Answer 1

  

data [rownames（apply（data，1，function（x）x [！is.nan（x）]））]

似乎在我的目的下工作正常。