R：更新data.table中的列名范围

Question

有没有一种优雅的方法来更新通过名称从data.table中选择的列的范围？

例如，假设我们有

dt <- data.table(A = LETTERS[1:5], B = LETTERS[6:10], C = LETTERS[11:15])

我想使用function(x) paste0('"', x, '"')将引号添加到从A到B的所有列中。

我试过了：

dt[, .SD := lapply(.SD, function(x) paste0('"', x, '"')), .SDcols=A:B]

没有结果。

Answer 1

我们可以使用names ，甚至可以使用类似c("A", "B")

f1 <- function(dat, v1) Reduce(seq, which(colnames(dat) %in% v1))
i1 <- f1(dt, c('A', 'B'))
dt[, (i1) := lapply(.SD, function(x) paste0('"', x, '"')), .SDcols=A:B]