有条件地用 data.table 替换列值答案

【问题标题】：Conditionally replacing column values with data.table有条件地用 data.table 替换列值
【发布时间】：2014-08-23 13:52:20
【问题描述】：

我有以下data.table：

dt <- data.table(col1 = rep("a",6), col2 = c(1,1,1,2,3,1))

现在我想用值“bigDog”替换 col2 中的所有 1。我可以使用 data.frame 精神做到这一点：

dt$col2[dt$col2==1,] <- "bigDog"

但我想知道是否有不同的方式，更多“面向data.table”？

【问题讨论】：

【解决方案1】：

此外，您还可以使用库 plyr

library(data.table)
library(plyr)
dt <- data.table(col1 = rep("a",6), col2 = c(1,1,1,2,3,1))
dt <- mapvalues(dt[,col2], c(1), c("BigDog"))

【讨论】：

【解决方案2】：

如果您不想更改列的类型，您可以这样做：

dt[col2 == 1, col2 := 123]

随着类型的改变，你可以这样做：

dt[, col2 := as.character(col2)][col2 == "1", col2 := "bigDog"]

如果您不先更改类型，“bigDog”将被强制转换为整数，即NA。当然，您还会收到一堆警告。

请注意，除了不那么繁琐的语法之外，使用:= 的优点是不会制作额外的数据副本（就像<- 那样），而是在原地修改。

【讨论】：