使用循環

Question

創建數據表，讓我們說我有一個data.table

DT=data.table(name = sample(letters[1:25],30,replace=T), value =rnorm(3000)) 

我想分裂DT的名稱，並創建新的DTS，如姓名DT_a，對應的名稱值DT_b。那我該怎麼辦呢？

Answer 1

試試這個：

DTs = split(DT, DT$name) 
lapply(names(DTs), function(x) assign(paste0('DT_',x), DTs[[x]], envir=.GlobalEnv)) 

Answer 2

我們可以使用list2env

lst <-split(DT, DT$name) 
list2env(setNames(lst, paste0("DT_", names(lst))), envir = .GlobalEnv) 

不過，建議保持在一個list，而不是在全球環境中創建多個數據集。但是，如果這只是爲了瞭解創建對象的可能性，則可以使用list2env。