リスト索引を持つdata.tablesのリストをリストから外す

Question

私はdata.tablesのリストを持っています。リスト索引を持つ新しい列と一緒にそれらをバインドしようとしていました。私は現在、data.tablesからrbindlist()を使用しましたが、そのリストインデックスの情報を保持したいと思います。これを手伝ってもらえますか？ @akrun点アウトとして

set.seed(1) 
x1<- data.table(x = LETTERS, y = runif(26)) 
x2<- data.table(x = LETTERS, y = runif(26)) 
l1 <- list(x1, x2) 
# head(x1) 
# x   y 
# 1: A 0.2655087 
# 2: B 0.3721239 
# 3: C 0.5728534 
# 4: D 0.9082078 
# 5: E 0.2016819 
# 6: F 0.8983897 

# head(x2) 
# x   y 
# 1: A 0.01339033 
# 2: B 0.38238796 
# 3: C 0.86969085 
# 4: D 0.34034900 
# 5: E 0.48208012 
# 6: F 0.59956583 

期待結果

x   y g 
    A 0.2655087 1 
    B 0.3721239 1 
    C 0.5728534 1 
    D 0.9082078 1 
    E 0.2016819 1 
    F 0.8983897 1 
     . 
     . 
     . 
    A 0.01339033 2 
    B 0.38238796 2 
    C 0.86969085 2 
    D 0.34034900 2 
    E 0.48208012 2 
    F 0.59956583 2 
     . 
     . 
     . 

Answer 1

idcolは `v.1.9.6

rbindlist(l1, idcol = 'g')