[解決済み] 複数のベクトルから共通要素を求めるには？

質問

複数のベクトルから共通要素を求める方法を教えてください。

a <- c(1,3,5,7,9)
b <- c(3,6,8,9,10)
c <- c(2,3,4,5,7,9)

上記のベクトルから共通要素を求めたい（例：3、9）

どのように解決するのですか？

もっと賢いやり方があるかもしれませんが

intersect(intersect(a,b),c)

が仕事をします。

編集部：もっと巧妙に、引数が多い場合はもっと便利に。

Reduce(intersect, list(a,b,c))