将vector添加为data.table作为单独值的单独新列

Question

我想将矢量添加到data.table，矢量元素的每个名称都对应一个新列，并且基于vector的重复值元素值。

所以给出：

x <- data.table(a=1:2, b=3:4) 
v <- c(c=5, d=6) 

我正在寻找的结果：

data.table(a=1:2, b=3:4, c=5, d=6) 
# a b c d 
# 1: 1 3 5 6 
# 2: 2 4 5 6 

事情我想：

cbind增加了向量作为一列：

cbind(x, v) 
# a b v 
# 1: 1 3 5 
# 2: 2 4 6 

从adding multiple columns to a data.table, where column names are held in a vector使用方法也向量化的方式，我不想：

x[, (names(v)) := v] 
# a b c d 
# 1: 1 3 5 5 
# 2: 2 4 6 6 

x[, (names(v)) := list(v)] 
# Same as above. 

Answer 1

我们可以做到这一点不也循环

x[, names(v) := as.list(v)] 
x 
# a b c d 
#1: 1 3 5 6 
#2: 2 4 5 6 

Answer 2

循环作品：

for (i in seq_along(v)) x[, (names(v)[i]) := v[i]] 

结果：

x 
# a b c d 
# 1: 1 3 5 6 
# 2: 2 4 5 6