粘贴两个 data.table 列

dt <- data.table(L=1:5,A=letters[7:11],B=letters[12:16])
   L A B
1: 1 g l
2: 2 h m
3: 3 i n
4: 4 j o
5: 5 k p

现在我想粘贴列“A”和“B”以获得一个新列，我们称之为“新”：

dt2
   L A B new
1: 1 g l  gl
2: 2 h m  hm
3: 3 i n  in
4: 4 j o  jo
5: 5 k p  kp

我遇到了类似的问题，但有很多列，并且不想手动键入它们。

新版本

（基于@mnel 的评论）

dt[, new:=do.call(paste0,.SD), .SDcols=-1]

这大约是旧版本的两倍，并且似乎避免了一些怪癖。注意使用.SDcols识别要使用的列paste0. The -1使用除第一列之外的所有列，因为 OP 想要粘贴 A 列和 B 列，但不粘贴 L 列。

如果您想使用不同的分隔符：

dt[ , new := do.call(paste, c(.SD, sep = ":"))]

旧版

您可以使用.SD and by处理多列：

dt[,new:=paste0(.SD,collapse=""),by=seq_along(L)]

I added seq_along以防 L 不唯一。 （您可以使用以下命令检查这一点dt<-data.table(L=c(1:4,4),A=letters[7:11],B=letters[12:16])).

另外，在我的实际实例中，由于某种原因我不得不使用t(.SD) in the paste0部分。可能还有其他类似的怪癖。