将数据框转换为命名向量

Question

我在我的dfm上应用了一个模型（wordscore）。结果，我得到了一个输出对象，它的类别是"textmodel_wordscores" "textmodel" "list"。我对输出中的"wordscores"感兴趣，这是一个"numeric"对象（当应用到该对象时会显示）, 它长这样:

           extensive      fiscal_stimulus              measure           operation  automatic_stabiliser 
          0.96765485           0.98292581          -0.70247675           0.63275195           0.75272326 
                will 
         -0.04568423

现在我有一个普通的数据框，其中包含两列，看起来像这样：

df <- data.frame(Words = c("commitment", "progress", "implement", "decision", "message", "deficit"), Score = c(-0.984345245754151, -0.983153011766781, -0.978586816039627, -0.977724303324149, -0.976291875611652, -0.975229993562152))

    Words              Score
1 commitment -0.984345245754151
2   progress -0.983153011766781
3  implement -0.978586816039627
4   decision -0.977724303324149
5    message -0.976291875611652
6    deficit -0.975229993562152

我想要这个数据框的格式与上面相同。我尝试将其转换为列表，但仍保留了双列框架。

- Rollo99

Answer 1

你可以做：

with(df, setNames(Score, Words))

commitment   progress  implement   decision    message    deficit 
-0.9843452 -0.9831530 -0.9785868 -0.9777243 -0.9762919 -0.9752300 

- tmfmnk

---

非常好的答案，完美地解决了问题，非常感谢！我会在 Stack 允许的时间内将其标记为正确答案。 - Rollo99

Answer 2

我们还可以使用 deframe。

library(tibble)
deframe(df)
#commitment   progress  implement   decision    message    deficit 
#-0.9843452 -0.9831530 -0.9785868 -0.9777243 -0.9762919 -0.9752300 

---

在基本的R中，names<-也可以使用。

with(df, `names<-`(Score, Words))

- akrun