将数字重新编码为字符[重复]

Question

have = data.frame("v1" = c(1,2,3))
want = data.frame("v1" = c("pass", "arb", "rtk"))

我想将数字重新编码为这些字符串。我对 data.table 的尝试失败了：

library(data.table)
have[, c("v1") := recode(v1, 1 == "pass", 2=="arb", 3=="rtk")]

Answer 1

'v1' 可以用作索引，因为它是从 1 开始的值序列。因此，如果我们按照我们想要的顺序传递新向量以重命名，那么 'pass' 将替换任何有 1 个值的位置在“v1”中，“arb”代表 2，“rtk”代表 3

library(data.table)
setDT(have)[, v1 := c('pass', 'arb', 'rtk')[v1]]

另一种选择是使用命名向量进行匹配

nm1 <- setNames(c('pass', 'arb', 'rtk'),  1:3)
setDT(have)[, v1 := nm1[as.character(v1)]]

---

或者使用factor label 选项来执行此操作

setDT(have)[, v1 := as.character(factor(v1, levels = 1:3, 
           labels = c('pass', 'arb', 'rtk')))]

---

在 OP 的代码中，recode 使用的是比较运算符 (==)，而不是 =。此外，对于数字值，用反引号括起来

setDT(have)[, v1  := dplyr::recode(v1, `1` = "pass", `2`="arb", `3`="rtk")]