Jak mogę wprowadzić klucz przez kolumnę list w data.table

Question

Po kolejnym this post, mam inne pytanie dotyczące kolumn list w data.table.

DT = data.table(x=list(c(1,2),c(1,2),c(3,4,5))) 

Wygląda na to, że nie można wpisać kolumny list.

DT[,y:=.I,by=x] 
Erreur dans `[.data.table`(DT, , `:=`(y, .I), by = x) : 
    The items in the 'by' or 'keyby' list are length (2,2,3). Each must be same length as rows in x or number of rows returned by i (3). 

myślałem mogłem z list tej samej długości, ale:

DT = data.table(x=list(c(1,2),c(1,2),c(3,5))) 
DT[,y:=.I,by=x] 
Erreur dans `[.data.table`(DT, , `:=`(y, .I), by = x) : 
    The items in the 'by' or 'keyby' list are length (2,2,2). Each must be same length as rows in x or number of rows returned by i (3). 

Czy istnieje obejście tego problemu? Jeśli nie, to co z prośbą o funkcję?

Answer 1

zrobiłbym coś takiego jako obejście:

DT[, y := which(DT$x %in% x), by = 1:nrow(DT)] 

ta zwraca indeks pierwszego pasującego zawsze, co będzie służyć jako identyfikator grupy.

Powinieneś zrobić coś takiego:

DT[, psnInGrp := seq_along(x), by=y] 

#  x y psnInGrp 
# 1: 1,2 1  1 
# 2: 1,2 1  2 
# 3: 3,4,5 3  1