在 R 中构造 3 路意外事件 table

Question

我有 4 个变量：Breathless(B)= {y,n}、wheeze(W)= {y,n}、age={g1,g2,...,g5} 和 count = {20 个数字}。我想构建一个如图所示的 table，但是 ftable 函数无法将输出正确安排到 table 中。我还能如何构建它？提前致谢！

ftable函数的输出：

Answer 1

您可以尝试使用来自 data.table

的 dcast 重塑您的数据

library(data.table)
setDT(data)
dcast(data, age + Breathless ~ wheeze, value.var = "count")

Answer 2

带有 tidyverse 的选项将是

library(dplyr)
library(tidyr)
data %>%
     pivot_wider(names_from = wheeze, values_from = count)

Construct 3-way contingency table in R