我如何在arsenal包中按类别更改统计测试？

我用阿森纳包创建了一个描述性表格，如下所示：

library(arsenal)
        mycontrols  <- tableby.control(test=TRUE, total=TRUE,
                                   numeric.test="kwt", cat.test="chisq",
                                   numeric.stats=c("meansd","median", "q1q3"),
                                   cat.stats=c("countpct"),
                                   stats.labels=list(meansd = "Mean (SD)", median='Median', q1q3='Q1,Q3'))
    tab.test <- tableby(list(vs,am,gear) ~ 
                          (mpg) + 
                          (disp) +
                          (hp) 
                          ,
                        data=mtcars,control=mycontrols
                      )
    summary(tab.test)

library（兵工厂）
真菌防治