r - 如何从r中的列联表中获取带有案例的data.frame？

Question

我想从一本书中重现一些计算(logit 回归)。书中给出了列联表和结果。

这是表:

    .


    example <- matrix(c(21,22,6,51), nrow = 2, byrow = TRUE)
    #Labels:
    rownames(example) <- c("Present","Absent")
    colnames(example) <- c(">= 55", "<55")

它给了我这个:

            >= 55 <55
    Present    21  22
    Absent      6  51

但是要使用 glm() 函数，数据必须采用以下方式:

(两列，一列是“Age”，一列是“Present”，填0/1)

    age <- c(rep(c(0),27), rep(c(1),73))
    present <- c(rep(c(0),21), rep(c(1),6), rep(c(0),22), rep(c(1),51))

    data <- data.frame(present, age)

    > data
        present age
    1         0   0
    2         0   0
    3         0   0
    .         .   .
    .         .   .
    .         .   .
    100       1   1

有没有一种简单的方法可以从表/矩阵中获取此结构？

Answer 1

您也许可以使用 countsToCases功能为 defined here .

countsToCases(as.data.frame(as.table(example))) 
#        Var1  Var2
#1    Present >= 55
#1.1  Present >= 55
#1.2  Present >= 55
#1.3  Present >= 55
#1.4  Present >= 55
#1.5  Present >= 55
# ...

如果您愿意，您可以随时将变量重新编码为数字。