在data.table中返回列中的列表

Question

我在R中有一個data.table，我正在使用data.tables來計算基於行值的列表。目前我已嘗試以下代碼爲例

library("data.table") 
dt <- data.table (data.frame(name = c("A","B","C")), num = c(10,20,30)) 
dt [,seq := list(replicate(5,num)),by = .I] 

但是，它不生成列表，而是重複值num列到seq列。如下圖所示

name  num seq 
A   10  10 
B   20  20 
C   30  30 

預期輸出是

name  num seq 
A   10  list(10, 10, 10, 10, 10) 
B   20  list(20, 20, 20, 20, 20) 
C   30  list(30, 30, 30, 30, 30) 

如何去與此？

Answer 1

感謝@Frank和@大衛，答案是

dt [,seq2 := list(list(replicate(5,num))), by = 1:nrow(dt)] 

主要是通過引起.I =靜靜地什麼也不做。

或者，您可以執行以下操作，因爲最好不要執行行操作。

dt[, res := transpose(replicate(5, num, simplify = FALSE))] 

在不同的方向，如果你正在尋找使用dplyr

dt %>% rowwise() %>% mutate(seq = list(rep(num, 5)))