在R中获得2x2x2列联表的总计

Question

我有3个以下形式的二进制变量的数据：

     A  B  C
     1  1  1
     1  0  0
     0  1  0
     .  .  .
     .  .  .

假设A是我控制的因素。我如何得到每个A级的B和C创建的2x2表的频率？

Answer 1

尝试：

req.session.authenticated = true;
req.session.User = user;
res.redirect('/');

这会将数据保存在数据框中（而不是使用<% if (session.authenticated) { %> ）

的列表

df <- expand.grid(A = c(1,1,0), B = sample(0:1, 100, T), C = sample(0:1, 100, T))

library(dplyr)
df %>% group_by(A) %>% summarise_each(funs(sum))

Answer 2

我做的如下。

df <- data.frame(A = c(1,1,0),
                 B = c(1,0,1),
                 C = c(1,0,0))
df[] <- lapply(df, as.factor)

# split by levels of A
dfs <- split(df[,2:3], df$A)

# table for each level
lapply(dfs, table)

$`0`
C
B   0 1
0 0 0
1 1 0

$`1`
C
B   0 1
0 1 0
1 0 1