如何找出R中列表中每个唯一元素的频率

Question

我有一个长度为927的列表。列表中每个元素的长度不相等。 （请考虑以下示例。我只给出了列表中的前6个元素）

[[1]]
[1] "DIR" "EMERGING" "UNP"      

[[2]]
[1] "DIR" "ECO" "UNP"             

[[3]]
[1] "DIRECT"

[[4]]
[1] "DIR" "ECO" "NATURAL"              

[[5]]
[1] "DIR"

[[6]]
[1] "DIR"

我的目标是找出列表中的唯一元素，并计算列表中每个唯一元素的频率。使用unique(list_name)，我找到了列表中的唯一元素。但我无法找出每个唯一列表元素的频率。任何帮助都会很明显。提前谢谢！

Answer 1

可以（假设您的列表名为list_name）

table(unlist(lapply(list_name, paste, collapse = " ")))

## DIR  DIR ECO NATURAL      DIR ECO UNP DIR EMERGING UNP           DIRECT 
##   2                1                1                1                1