2

次の 2 つのリストがあります。

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"

私の目標は、結果が次のようになるように、これら 2 つの多次元リストを比較することです。

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

この intersect() 関数を実行するための最良のベクトル化方法は何ですか?

4

1 に答える 1

6

これは、使用する代替手段です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"))

intersectどの値がリストの s であるかを知りたい場合は、 これを試してください

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

[[2]]
[1] "ff"

[[3]]
character(0)
于 2013-09-09T18:06:45.050 に答える