根据值创建与行名对应的列名列表，并在dataframe中追加

Question

我有以下数据框：

    C1  C2  C3  C4  C5  
R1  1   0   0   1   5  
R2  0   1   5   8   3   
R3  5   8   0   6   0 

现在我希望结果以下面的形式

R1 C2,C3
R2 C1
R3 C3,C5

即特定行的所有值＆gt; 0的colnames以及数据框中的行名称。

Answer 1

我们可以使用apply遍历行，获取与0和names

值对应的paste

data.frame(col1 = apply(df1, 1, FUN = function(x) toString(names(x)[x==0])))