> descr(dat, "gender", test_options = c(exact = TRUE)) %>% print()
  Variables F          M          Total     p      Test           CI            
1  party                                                                        
2    A       12 (60%)   8 (33%)    20 (45%~  0.08~  Boschloos te~  Prop. dif. C~
3    B       8 (40%)    16 (67%)   24 (55%~                        [-0.019, 0.5~

