计算 R 数据帧列中变量值的唯一组合[重复]

我想计算每个组中出现的变量的唯一组合。 例如：

df <- data.frame(id = c(1,1,1,2,2,2,3,3,4,4,4,5,6,6,7,7,7),
                 status =  c("a","b","c","a","b","c","b","c","b","c","d","b","b","c","b","c", "d"))

> df
   id status
1   1      a
2   1      b
3   1      c
4   2      a
5   2      b
6   2      c
7   3      b
8   3      c
9   4      b
10  4      c
11  4      d
12  5      b
13  6      b
14  6      c
15  7      b
16  7      c
17  7      d

例如，这样我就可以计算给定的“状态”组合出现的次数。 例如，我手动看到“a,b,c”总共出现了两次（id 1 和 2）。

这些似乎是类似的问题，但我不知道如何做，并且在 R 中有更清晰的解释：计算独特的组合 https://stackoverflow.com/questions/57316456/counting-unique-combinations 无论顺序如何，独特组合的计数 https://stackoverflow.com/questions/38958152/count-of-unique-combinations-despite-order

我想我正在寻找的结果是这样的：

abc 2
bc  3
b   1
...

一个选项tidyverse其中按“id”分组，paste'状态'并获得count

library(dplyr)
library(stringr)
df %>% 
   group_by(id) %>% 
   summarise(status = str_c(status, collapse="")) %>% 
   count(status)
# A tibble: 4 x 2
#  status     n
#  <chr>  <int>
#1 abc        2
#2 b          1
#3 bc         2
#4 bcd        2