如何在R语言的字符向量列表中查找任意相交元素？

核心需求是找出列表中被至少两个不同向量包含的元素，这类元素就是构成部分向量相交关系的核心值，和Reduce(intersect, l)寻找全列表公共元素的逻辑完全不同，可通过以下无额外依赖的基础R方法实现：

方法1：摊平列表统计频次（简洁高效，适合大规模数据） #

将列表内所有向量的元素合并为单一向量，统计每个字符的出现次数，凡是出现次数≥2的，即为目标相交元素。
示例代码：

l <- list(c("a"),c("a","b"),c("a","c"),c("d"),c("e"),c("h","i"))
# 摊平所有列表元素，统计每个值的出现频次
elem_count <- table(unlist(l))
# 筛选出现频次≥2的元素，即为目标相交值
intersect_elem <- names(elem_count)[elem_count >= 2]

运行后得到的intersect_elem为"a"，和示例预期完全匹配。

方法2：定位相交元素的所属向量 #

如果除了拿到目标元素，还需要确认元素具体被哪几个向量共享，可通过元素-位置映射实现：

# 建立元素和其所属列表下标的映射关系
elem_map <- split(rep(seq_along(l), lengths(l)), unlist(l))
# 筛选被至少2个向量包含的元素
target_intersect <- elem_map[lengths(elem_map) >= 2]

运行后得到的target_intersect为：

$a
[1] 1 2 3

可以直接看到a是被列表中第1、2、3个向量共同包含的元素。

方法选择提示：方法1计算速度快，适合仅需获取相交元素列表的场景；方法2可追溯相交关系的来源，适合需要进一步分析向量关联结构的场景。

内容的提问来源于stack exchange，提问作者dan