想象一下,我有一个问题,有四个选项,受访者可以选择零个或四个选项的任意组合。变量被命名为A
, B
, C
, and D
响应存储在 data.frame 中,如下所示。
set.seed(1)
dat = data.frame(A = sample(c(0, 1), 20, replace=TRUE),
B = sample(c(0, 1), 20, replace=TRUE),
C = sample(c(0, 1), 20, replace=TRUE),
D = sample(c(0, 1), 20, replace=TRUE))
我可以将响应的组合制成表格(例如,有多少人响应A
独自一人,或A
+B
, or C
+D
等)通过执行以下操作:
data.frame(table(dat))
# A B C D Freq
# 1 0 0 0 0 2
# 2 1 0 0 0 2
# 3 0 1 0 0 0
# 4 1 1 0 0 1
# 5 0 0 1 0 1
# 6 1 0 1 0 3
# 7 0 1 1 0 0
# 8 1 1 1 0 2
# 9 0 0 0 1 0
# 10 1 0 0 1 2
# 11 0 1 0 1 1
# 12 1 1 0 1 1
# 13 0 0 1 1 2
# 14 1 0 1 1 0
# 15 0 1 1 1 3
# 16 1 1 1 1 0
我现在想创建一个新列,显示此输出所代表的字母组合。例如,第 4 行表示的计数A
+B
响应,第 14 行表示响应的计数A
+C
+D
回应。
我认为其中之一apply
函数在这里很有用,但我不知道如何继续。