如何重塑此数据框？

Question

我有以下数据框，其中单词代替了默认行号（1、2、3 等）：

                       Score
commitment            -0.9843452
progress              -0.9831530
implement             -0.9785868
decision              -0.9777243
message               -0.9762919
deficit               -0.9752300
invest                0.9929340
multiplier            0.9940889
fiscal_capacity       0.9940889
public_investment     0.9949193
aggregate_demand      0.9955452
space                 0.9960338

我想实现两件事：1）单词的“列”成为适当的列（数据框的第二列）； 2) 只保留那些得分大于或等于 0 的单词。我尝试了很多解决方案，但都失败了。 不幸的是，我不知道如何用单词而不是数字创建 dfm，所以我无法为您提供代码（我从现实生活中的列表中推导出来）。

有没有人可以帮我解决这个问题？ 非常感谢！

Answer 1

这是一个带有base R的选项。 从数据subset的行名称创建一个data.frame ，并根据“Score”的值对行进行subset

subset(data.frame(newcol = row.names(df1), Score = df1$Score), Score >=0)

---

或者使用tidyverse

library(dplyr)
library(tibble)
rownames_to_column(df1, 'newcol')  %>%
     filter(Score >= 0)