match(x, y) 函数非常适合在向量 y 的元素中搜索向量 x 的元素。但是，当y 是一个向量列表（长度可能不同）时，做类似工作的一种有效且简单的方法是什么？
我的意思是结果应该是一个与x长度相同的向量，第i个元素应该是y的第一个成员，它包含x的第i个元素，或者@987654328 @。
【问题讨论】：
lapply(y, match, table = x)这样的东西吗？
y 的索引，x 中的每个元素是首先找到的吗？或者你想要一个长度列表y，其中每个元素的索引与x的元素匹配？
要找到 x 的每个元素（第一个）出现在其中的 y 元素，试试这个：
## First, a reproducible example
set.seed(44)
x <- letters[1:25]
y <- replicate(4, list(sample(letters, 8)))
y
# [[1]]
# [1] "t" "h" "m" "n" "a" "d" "i" "b"
#
# [[2]]
# [1] "c" "l" "z" "a" "s" "d" "i" "u"
#
# [[3]]
# [1] "b" "k" "e" "g" "o" "i" "h" "j"
#
# [[4]]
# [1] "g" "i" "f" "r" "h" "w" "l" "o"
## Find the element of y first containing the letters a-j
breaks <- c(0, cumsum(sapply(y, length))) + 1
findInterval(match(x, unlist(y)), breaks)
# [1] 1 1 2 1 3 4 3 1 1 3 3 2 1 1 3 NA NA 4 2 1 2 NA 4 NA NA
【讨论】：
breaks <- cumsum(c(1, sapply(groups, length)))
findInterval 可以成为功能的真正瑰宝！ （See here 是一个很酷的例子。）