r - 向数据表中添加列

Question

我有一个 data.frame （或矩阵或任何其他表格数据结构对象）：

df = data.frame(field1 = c(1,1,1),field2 = c(2,2,2),field3 = c(3,3,3))

我想复制它的部分列 - 在下面的向量中给出：

fields = c("field1","field2")

到已经有 1 个或更多列的新 data.table ：

dt = data.table(fieldX = c("x","x","x"))

我正在寻找比以下更有效（和优雅）的东西：

for(f in 1:length(fields))
{
dt[,fields[f]] = df[,fields[f]]
}

Answer 1

您可以使用cbind：

cbind(dt, df[fields])

但是，最有效的方法仍然可能是使用data.table's assign by reference：

dt[, (fields) := df[fields]]

Answer 2

我想你想要 cbind

cbind(dt, df[, 1:2])
# fieldX field1 field2
# 1      x      1      2
# 2      x      1      2
# 3      x      1      2