與sf包一起使用時，data.table的錯誤行爲

Question

data.table與sf::st_union一起使用時會出現不正確的聚合，而dplyr似乎可以正確處理它。有人可以解釋爲什麼data.table產生這個結果嗎？

library(data.table) 
library(sf) 
library(dplyr) 
nc <- st_read(system.file("shape/nc.shp",package="sf")) 
nc_DT <- as.data.table(nc) 
nc %>% group_by(SID74) %>% summarise(geom = st_union(geometry)) %>% nrow # prints 23 (correct answer) 
nrow(nc_DT[,st_union(geometry),by=SID74]) # prints 83 (incorrect answer) 

Answer 1

如果我們把它放在一個list，行數將是23

res <- nc_DT[, .(geom = st_union(geometry)),by=SID74] 
nrow(res) 
#[1] 23