更新 data.table 中列子集的类

Question

我想将几个 data.table 列从因子更改为字符

library(data.table)

ir <- as.data.table(iris)
ir[, Species2 := Species]

我可以确定我需要更改哪些列

facs <- which(sapply(ir, is.factor))
facs

我可以按名称更新列：

ir[, c("Species", "Species2") := lapply(.SD, as.character), .SDcols = facs]
sapply(ir, class)

有没有办法在不通过名称引用它们的情况下更新列？

Answer 1

你很亲密。正如@akrun 在评论中提到的，您可以按索引引用列，这是您使用which 获得的。

ir[, which(sapply(ir, is.factor)) := lapply(.SD, as.character), .SDcols = facs]

或者更好，正如@Frank 在评论中提到的，您可以使用括号。

ir[, (fac) := lapply(.SD, as.character), .SDcols = fac]

现在，如果您查看str(ir)，您会发现Species 和Species2 现在是chr，而不是factor。