Я пытаюсь реализовать метод data.table, описанный здесь: Расчет сгруппированной дисперсии из таблицы частот в R .
Я могу успешно повторить их пример.Но когда я применяю это к своим собственным данным, кажется, ничего не происходит.В частности, вывод таков:
table <- data.frame(districts,proportions,populations)
table<-setDT(table)
districts proportions populations
1: 24 0.8270270 1269
2: 26 0.8867925 1679
3: 12 0.9136691 510
4: 27 0.4220532 3274
5: 20 0.5457650 3644
---
8937: 1 0.7798072 3444
8938: 1 0.6080247 6128
8939: 1 0.4655172 4335
8940: 1 0.4813200 4297
8941: 1 0.7690167 3906
setDT(table)[, list(GroupMedian=as.double(median(rep(proportions, populations))),
TotalCount=sum(populations)) , by = districts]
print(table)
##Same output as above###
Я понятия не имею, что происходит, спустя много времени.