R data.table列的总和

Question

我有：

dataDT <- data.table(A = rep(1, 3), B = rep(2, 3), C = rep(3, 3))
dataDT
   A B C
1: 1 2 3
2: 1 2 3
3: 1 2 3

我想创建3个新列，以便：

dataDT[, A_r := A]
dataDT[, B_r := A + B]
dataDT[, C_r := A + B + C]
dataDT
   A B C A_r B_r C_r
1: 1 2 3   1   3   6
2: 1 2 3   1   3   6
3: 1 2 3   1   3   6

即

• 每个新列都是从左到右的累积总和。
• 如果最初有x列，那么将有x个新列。

如何实现（而不是显式编码和编写）？