R中的多因子计数

我做了一个简单的调查，有两个条件和十个问题，答案都是“是”或“否”。在R中，我有一个数据框，列有参与者ID、条件（1或2，作为因素），每个问题有10列（1或2，作为因素）。我想为每个参与者统计“是”或“否”的频率，这样我就可以根据条件进行卡方检验。然而，我不知道如何让它给出参与者的“是”和“否”计数

---

我基本上想做tapply（数据$question1，数据$Participant，count），但不仅仅是“问题1”，而是所有10个问题。我该如何做才能运行卡方检验？

你很接近了……试试这样的方法：

data(swiss)
swiss$Fertility <- ifelse(swiss$Fertility < mean(swiss$Fertility), "yes", "no")
apply(swiss[,2:6], 2, FUN = function(x) tapply(x, swiss$Fertility, NROW))

数据（瑞士）
瑞士元生育率我们可以使用
表格

table(df1[1][row(df1[-1])], unlist(df1[-1]))

数据
set.seed（24）
df1
set.seed(24)
df1 <- data.frame(ParticipantID= 1:5, matrix(sample(c('yes', 
          'no'), 5*10, replace=TRUE), ncol=10))