將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