翻转表中的列/行

Question

我正在使用epiR软件包,因为它具有优秀的2比2列联表,比值比和人口归因分数.

通常我的数据被编码为0 =否1 =是

所以,当我这样做

tabele(var_1,var_2)

输出以对齐的表格形式出现

对于它的输入虽然epiR希望左上方为Exposed + VE Outcome + VE - 即左上方应为Var 1 == 1且Var 2 == 1

目前我通过将零重新编码为2或者通过设置为因子并使用重新级别来执行此操作.这些都对其他分析有点烦人,因为一般来说我希望Outcome + VE来自Outcome-VE

所以我想知道是否有一种简单的方法(在表内？)来翻转表的方向,以便它基本上反转行/列的顺序？

希望以上是有道理的 - 如果没有,我很乐意提供澄清.

---

编辑:感谢以下建议; 只是为了澄清我希望能够在从现有数据帧变量调用表时执行此操作 - 即我正在做的是表(数据$ var_1,数据$ var_2) - 理想情况下无需创建一个全新的对象

Answer 1

表是一个简单的矩阵.您可以按相反的顺序调用索引.

xy <- table(data.frame(value = rbinom(100, size = 1, prob = 0.5),
           variable = letters[1:2]))

     variable
value  a  b
    0 20 22
    1 30 28

xy[2:1, 2:1]

     variable
value  b  a
    1 20 30
    0 30 20