Rには、複数のベクトル(長さの異なる)で共通の文字を見つける機能がありますか? たとえば、3 つのベクトルがある場合...
a1 <- LETTERS[1:7]
a2 <- LETTERS[4:8]
a3 <- LETTERS[2:10]
a1
# [1] "A" "B" "C" "D" "E" "F" "G"
a2
# [1] "D" "E" "F" "G" "H"
a3
# [1] "B" "C" "D" "E" "F" "G" "H" "I" "J"
私は厄介な解決策を考えることができます...
intersect(intersect(a1,a2),a3)
# [1] "D" "E" "F" "G"
問題は、約 8 つまたは 9 つのベクトルがあることです。これにもっと良い方法はありますか？