带有不同变量的嵌套表,如带有r的行

带有不同变量的嵌套表,如带有r的行,r,knitr,nested-table,R,Knitr,Nested Table,我试图使用r中的tables包创建一个嵌套表,然后将其添加到knitr文档中 我想制作一个表格,其中每一行是数据集中不同的分类变量,每一列是每个响应选项的频率和百分比 我希望结果像这样 Variable 1-5 times 6-10 times 11-15 times freq Percent freq percent freq percent eating 5 33 5

我试图使用r中的
tables
包创建一个嵌套表,然后将其添加到knitr文档中

我想制作一个表格,其中每一行是数据集中不同的分类变量,每一列是每个响应选项的频率和百分比

我希望结果像这样

Variable     1-5 times        6-10 times      11-15 times
           freq    Percent  freq   percent   freq  percent    
eating       5       33       5      33       5       33
drinking     5       33       5      33       5       33
下面是一些代码,可以生成上表

eating <- c("1-5 times", "1-5 times", "1-5 times","1-5 times","1-5 times", "6-10 times","6-10 times","6-10 times","6-10 times","6-10 times", "11-15 times","11-15 times","11-15 times","11-15 times","11-15 times")
drinking<-c("1-5 times", "1-5 times", "1-5 times","1-5 times","1-5 times", "6-10 times","6-10 times","6-10 times","6-10 times","6-10 times", "11-15 times","11-15 times","11-15 times","11-15 times","11-15 times")
eating<-factor(eating)
drinking<-factor(drinking)
df<-data.frame(eating,drinking)

吃这不完全是你想要的,但已经足够接近了:

library(plyr)
x<-ddply(df,.(eating,drinking),summarize,freq=length(eating))
x$perc<-with(x,(100*freq/sum(freq)))

   > x
       eating    drinking freq     perc
1   1-5 times   1-5 times    5 33.33333
2 11-15 times 11-15 times    5 33.33333
3  6-10 times  6-10 times    5 33.33333
库(plyr)

XY您可以使用
ftable
。有关详细信息,请参见
?ftable
。该软件包可能会有所帮助,尤其是
?table nominal
@Metrics using ftable是否有计算百分比的方法?是的,您可以查看概述