Expss: добавить итог столбца, который добавляет итоговую строку переменной

Question

У меня есть таблица, основанная на наборе данных mtcars. В колонке у меня есть переменные двигателя и трансмиссии;в строке у меня есть переменный номер цилиндра. Я хотел бы иметь вместо 100 количество дел в ряду или количество дел для каждого числа цилиндров

несколько баннеров tres важный

library(expss)
data(mtcars)
mtcars %>% 
    tab_cells(cyl) %>% 
    tab_cols(vs,total(),am,total("u_cases"),vs,total()) %>% 
    tab_total_row_position("below") %>% 
    tab_total_statistic("u_rpct")%>%
    tab_stat_rpct() %>% 
    tab_pivot()

Answer 1

Это пример таблицы, которую я хочу получить в результате. спасибо за ваш ответ.

Answer 2

Думаю, что эта таблица верна. Только одно, сумму столбца итого дают 100 \% вместо общего наблюдения

Пьер

Answer 3

Если я правильно понимаю, что вам нужно:

mtcars %>% 
    tab_cells(cyl) %>% 
    tab_total_row_position("below") %>% 
    tab_total_statistic("u_rpct")%>%
    tab_cols(vs) %>% 
    tab_stat_rpct() %>% 
    tab_cols(total(vs)) %>% 
    tab_stat_cases() %>% 
    tab_cols(am) %>% 
    tab_stat_rpct() %>% 
    tab_cols(total(am)) %>% 
    tab_stat_cases() %>% 
    tab_pivot(stat_position = "outside_columns")

# |     |             |    vs |      | #Total |   am |      | #Total |
# |     |             |     0 |    1 |        |    0 |    1 |        |
# | --- | ----------- | ----- | ---- | ------ | ---- | ---- | ------ |
# | cyl |           4 |   9.1 | 90.9 |     11 | 27.3 | 72.7 |     11 |
# |     |           6 |  42.9 | 57.1 |      7 | 57.1 | 42.9 |      7 |
# |     |           8 | 100.0 |      |     14 | 85.7 | 14.3 |     14 |
# |     | #Total rpct |  56.2 | 43.8 |    100 | 59.4 | 40.6 |    100 |