我有一个数据框,我想计算两列中每个事件组合出现的次数(按任意顺序)。
例如说我有
df <- data.frame('x' = c('a', 'a', 'b', 'c', 'c', 'c'),
'y' = c('b', 'c', 'c', 'a', 'a', 'b'))
所以
x y
a b
a c
b c
c a
c a
c a
c b
a
和b
一起出现一次(第1行),a
和c
4次(第2,4,5,6行)和{{1} }和b
两次(第3行和第7行)所以我想要返回
c
我希望这有道理吗?提前致谢
答案 0 :(得分:4)
这应该有效:
table(apply(df,1,function(x) paste(sort(x),collapse='-')))
a-b a-c b-c
1 3 2