r - Rの部分一致の文字ベクトルを比較する方法

Question

これは簡単な質問に違いありませんが、Rの新参者として私はそれを理解することができませんでした。

List1とList2の2つの文字ベクトルがありますが、List1のサンプルのうちList2にもいくつあるか知りたいのですが。しかし、List2には多くの場合、複数の名前がまとめられているため、混乱しているようです。架空のリストは次のとおりです。

List1 <- c("SampleX", "SampleY", "SampleZ", "SampleQ")

List2 <- c("SampleX", "SampleY", "Alias1,Alias2,SampleZ")

SampleXとSampleYを識別する出力を取得できますが、SampleZは取得できません。

助言がありますか？？

ありがとう！！

Answer 1

どうですか：

List1[sapply(List1,function(x) any(grepl(x,List2)))]
[1] "SampleX" "SampleY" "SampleZ"

？