r - 计算每个唯一元素在列表中出现的次数

Question

如何计算每个唯一元素在列表中出现的次数？

example_list <- list(
  c(1,1),
  c(1,2),
  c(1,1),
  c(1,2,3),
  c(1,1),
  c(1,2,3)
)

编辑:唯一元素是向量而不是向量中的数字

Answer 1

如果是相似元素的计数，一种选择是通过使用 遍历 list 将元素粘贴 list >sapply 创建一个vector，并通过table

获取频率计数

table(sapply(example_list, paste, collapse=' '))

#  1 1   1 2 1 2 3 
#    3     1     2 

---

或者另一种选择是将 list 转换为宽数据集并使用 count

library(dplyr)
library(tidyr)
tibble(col1 = example_list) %>% 
   unnest_wider(col1) %>% 
   count(across(everything()))