r - 在“表格”包中：如何获取变量子集的列百分比？

Question

在下表中，名为“百分比”的列显示了总列百分比。我如何让它在“vs”的每个级别中显示每个“am”级别的列百分比？

这就是我所拥有的：

这就是我要找的：

针织块如下：

<<echo=FALSE,results='asis'>>=
# 
# library(tables)
# library(Hmisc)
# library(Formula)

## This gives me column percentages for the total table.
latex(  tabular(  Factor(vs)*Factor(am)  ~  gear*Percent("col"),    data=mtcars )     )

## I am trying to get column percentages for each level of "vs"

@

Answer 1

我认为你需要改变你的公式来做到这一点。像这样的例子：

tabular(Factor(vs) ~ gear*Percent("row")*Factor(am), data = mtcars)

#   gear         
#   Percent      
#   am           
#vs 0       1    
#0  66.67   33.33
#1  50.00   50.00

Answer 2

您可以使用Equal()denom 选项的伪函数来确定因子与分母的水平。

library(tables) 
tabular( Factor(vs)*Factor(am)  ~  gear*Percent(denom = Equal(vs)),    data=mtcars)

#>               
#>        gear   
#>  vs am Percent
#>  0  0  66.67  
#>     1  33.33  
#>  1  0  50.00  
#>     1  50.00

^{由reprex 包（v0.3.0）于 2020 年 9 月 7 日创建}