按位置比较两个列表的元素，以测试r中的公共字符串

（和类似的问题，但python除外。）

我有两个长度相等的列表，每个列表包含字符向量。我想逐位置对比这些列表，以测试它们是否有公共元素

list_1 <- list(c("a","b"), c("a","c"))
list_2 <- list(c("a","x"), c("p","q"))

> list_1
[[1]]
[1] "a" "b"

[[2]]
[1] "a" "c"

> list_2
[[1]]
[1] "a" "x"

[[2]]
[1] "p" "q"

预期的解决办法是：

[[1]]
[1] TRUE

[[2]]
[1] FALSE

---

帮助？

您想要的

？mapply

，它允许您在多个（“m”）列表中“并行”迭代或应用匿名函数

如果向anon函数添加另一个参数，则可以将其扩展到2个以上的列表

[[1]]
[1] TRUE

[[2]]
[1] FALSE

mapply(function(x, y) {any(x %in% y)}, list_1, list_2)