如何在给定变量的组之间以百分比差异在tableby r输出中添加列？

问题描述

我想在tableby r输出中添加一列，请在给定变量的组之间添加百分比差异。

我当前的代码是：

tabout <- tableby(group ~ anova(category1,digits=2)+  anova(category2,digits=2)+ anova(category3,digits=2),data=sampledata,total=FALSE)
summary(tabout,text=TRUE)

哪个给我这个：

                       |Group1(N=122)|Group2(N=122)| p value|
|:---------------------|:-----------:|:-----------:|-------:|
|category1             |             |             |   0.019|
|-  Mean (SD)          | 4.66 (0.72) | 5.29 (0.61) |        |
|-  Range              | 3.70 - 6.00 | 4.22 - 6.62 |        |
|category2             |             |             |   0.022|
|-  Mean (SD)          | 5.26 (0.89) | 6.02 (0.76) |        |
|-  Range              | 3.98 - 6.98 | 4.81 - 7.60 |        |
|category3             |             |             |   0.050|
|-  Mean (SD)          | 5.16 (0.89) | 5.81 (0.79) |        |
|-  Range              | 3.96 - 6.70 | 4.77 - 7.63 |        |

理想情况下，我希望在此栏中再增加一列，以说明第1组与第2组之间的百分比差异

                       |Group1(N=122)|Group2(N=122)| p value|percdiff
|:---------------------|:-----------:|:-----------:|-------:|-------:
|category1             |             |             |   0.019| -12
|-  Mean (SD)          | 4.66 (0.72) | 5.29 (0.61) |        |
|-  Range              | 3.70 - 6.00 | 4.22 - 6.62 |        |
|category2             |             |             |   0.022| -13
|-  Mean (SD)          | 5.26 (0.89) | 6.02 (0.76) |        |
|-  Range              | 3.98 - 6.98 | 4.81 - 7.60 |        |
|category3             |             |             |   0.050| -11
|-  Mean (SD)          | 5.16 (0.89) | 5.81 (0.79) |        |
|-  Range              | 3.96 - 6.70 | 4.77 - 7.63 |        |

任何帮助将不胜感激。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）