如何在R语言的向量列表中筛选包含指定值的向量？

先给出模拟你场景的示例数据：

# 定义向量并组成列表
a <- c(1, 2, 4)
b <- c(1, 5, 6)
c <- c(2, 3, 7)
d <- c(4, 5, 8)
e <- list(a = a, b = b, c = c, d = d)

1. 筛选包含单个值的向量（比如包含1的a、b） #

方法1：基础R子集操作 #

# 筛选包含值1的向量
filtered_single <- e[sapply(e, function(vec) 1 %in% vec)]

sapply()遍历列表中每个向量，通过1 %in% vec判断目标值是否存在，返回的逻辑向量会自动提取符合条件的列表元素。

方法2：使用Filter()函数 #

filtered_single <- Filter(function(vec) 1 %in% vec, e)

Filter()是R中专门用于列表过滤的函数，语法更简洁直接。

2. 筛选同时包含多个值的向量（比如同时包含2和3的c） #

设定目标值后，用all()判断所有目标值是否都存在于向量中：

# 设定要同时包含的目标值
targets <- c(2, 3)

# 基础R子集方法
filtered_multi <- e[sapply(e, function(vec) all(targets %in% vec))]

# 或者用Filter()实现
filtered_multi <- Filter(function(vec) all(targets %in% vec), e)

如果需要筛选包含任意一个目标值的向量，只需把代码中的all()替换成any()即可。

内容的提问来源于stack exchange，提问作者Young Tae Won