rbindlist

Question

Ben ben rbindlist istiyorum data.tables birkaç. Tablolar (muhtemelen eksik) seviyeleri olan faktörler içerir. rbind I seviyesini düşük tutmak istiyorsanız

dt1 <- data.table(x=factor(c("a", "b"), levels=letters)) 

rbindlist(list(dt1, dt1))[,x] 
## [1] a b a b 
## Levels: a b 

do.call(rbind, list(dt1, dt1))[,x] 
## [1] a b a b 
## Levels: a b c d e f g h i j k l m n o p q r s t u v w x y z 

, ben tor çare var mı ya da data.table yolu vardır: Sonra rbindlist(...)do.call(rbind(...)) farklı davranır? Ben rbindlist tahmin

Answer 1

o niye bağlayıcı sonra düzeylerini belirlemek için değil do.call(rbind.data.frame,...)

kontrolünü yapmaz çünkü hızlıdır? ?setattr den

Dt <- rbindlist(list(dt1, dt1)) 
    setattr(Dt$x,"levels",letters) ## set attribute without a copy 

:

setattr(), referans ile bu özelliklerini ayarlamak için, birçok durumda kullanışlıdır ve bir nesne herhangi bir nesne ya da bir kısmı kullanılabilir, sadece data.tables değildir. Bu sorunu işaret için

Answer 2

teşekkürler. version 1.8.11 itibariyle sabit olmuştur:

dt1 <- data.table(x=factor(c("a", "b"), levels=letters)) 

rbindlist(list(dt1, dt1))[,x] 
#[1] a b a b 
#Levels: a b c d e f g h i j k l m n o p q r s t u v w x y z