Взвешивание данных и отображение пустых ячеек "0" проблема с expss R - PullRequest
0 голосов
/ 18 апреля 2020

У меня есть коды ниже. В нем нет ошибки, но когда я взвешиваю таблицу с помощью tab_weight, это просто влияет на встроенные строки. Общее количество строк не меняется. Общее количество строк должно измениться, как я могу это сделать?

И второе: если в ячейке есть пустое поле. Можно ли изменить на ноль "0"? Например, строка «Эрзурум» не имеет регистра, она должна отображаться 0 0 0 0 0 ...

df %>% 
tab_cells(F1) %>%
tab_cols(tepe_kolonlari) %>% 
tab_weight(sys_RespNum) %>% 
tab_stat_cases(total_label = "Sum", total_row_position = "above") %>% 
tab_pivot()

вывод

            Kadın    Erkek           18 - 24     25 –34      35 - 44     45- 54          A       B       C1      C2      D       E 
 #Toplam    204         122     82      25  81  98          30  76  74  15  6   3
 Ankara     2832        2087    745         339     1174    1319            678     828     1145    87  94  
 Antalya    1203        525     678             525     678                 517     686             
 Bursa      2257        1269    988         1038    899     320                 345     902     340     670     
 Erzurum                                                                
 Gaziantep                                                                  
 İstanbul   30010       18746   11264       2567    11835   15608           2462    11888   13626   1664        370
 İzmir      2601        1476    1125        1416    327     858             364     198     887     333     575     244
 Kayseri    199         199                 199                     199                 
 Malatya    220             220         220                         220                 
 Samsun     1451        979     472             940     511             188     752         511         
 Tekirdağ   225         192     33          192     33              33      192         

Трабзон 445 152 293 339 106 339 106

1 Ответ

1 голос
/ 19 апреля 2020

По умолчанию общая статистика c не учитывается. Вам необходимо указать взвешенные значения:

df %>% 
    tab_cells(F1) %>%
    tab_cols(tepe_kolonlari) %>% 
    tab_weight(sys_RespNum) %>% 
    # 'w_cases' - weighted cases
    tab_stat_cases(total_label = "Sum", total_row_position = "above", total_statistic = "w_cases") %>% 
    tab_pivot() %>% 
    # 'if_na' to show zeroes instead of blanks
    if_na(0)
...