汇总来自多个数据帧的向量

Question

我有五个具有不同数量向量的数据帧。向量Q10存在于所有数据帧中（字符；值=“是”或“否”）。我目前以这种方式检查此变量的内容：

table(mon1$Q10)
table(tue1$Q10)
table(wed1$Q10)
table(thr1$Q10)
table(fri1$Q10)

如何更快地执行此操作？我可以使用循环，但这似乎效率不高。我以为apply函数可以解决这个问题（我已经将数据帧放置在名为svylist的列表中），但是我还没有解决。

结果输出应显示每个数据帧的“是”和“否”值的计数。单个表会很出色，但是即使上面重复的table()函数的输出也可以正常工作。

Answer 1

将所有数据框组合到一个列表中，然后使用sapply访问它们：

days1<-list(mon=mon1,tue=tue1,wed=wed1,thr=thr1,fri=fri1)
sapply(days1, function(x) table(x$Q10))

使用两个数据帧进行演示，因为我很懒：

  mon tue
n    2   1
y    2   3