比较R中的多维列表

我有以下两个清单：

First list:
[[1]]
[1] "ab" "iew"  "rer" "fdd"     
[[2]]
[1] "ff" "de 
[[3]]
[1] "cc"

Second list:
[[1]]
[1] "iew" "vfr" 
[[2]]
[1] "ff" "cdc"
[[3]]
[1] "vf" "cde"

我的目标是比较这两个多维列表，以便得出以下结果：

[[1]]
[1] FALSE TRUE FALSE FALSE 
[[2]]
[1] TRUE FALSE
[[3]]
[1] FALSE

---

执行此intersect（）函数的最佳矢量化方法是什么？

这里有一个使用

mapply

> mapply("%in%", Firt.list, Second.list)
[[1]]
[1] FALSE  TRUE FALSE FALSE

[[2]]
[1]  TRUE FALSE

[[3]]
[1] FALSE

其中

First.list

和

Second.list

是：

Firt.list <- list(c("ab", "iew",  "rer", "fdd" ), c("ff", "de"), c("cc"))
Second.list <- list(c("iew", "vfr"), c("ff", "cdc"), c("vf", "cde"))

> mapply("intersect", Firt.list, Second.list)
[[1]]
[1] "iew"

[[2]]
[1] "ff"

[[3]]
character(0)