Znajdź kombinacje słów w dwóch wektorach

Question

Mam długą listę słów zawartych w dwóch wektorach

Pierwszy wektor wygląda następująco:

x <- c("considerably", "much", "far") 

Drugi wektor wygląda następująco:

y <- c("higher", "lower") 

Potrzebuję zwrócony wektor, który zawiera listę możliwych kombinacji słów z każdego wektora. Korzystanie x i y, musiałbym to wektor zwrócony

[1] "considerably higher" "considerably lower" "much higher"   "much lower"   
[5] "far higher"   "far lower" 

Dlatego słowa wektora x musi przyjść przed słów wektora y. Czy istnieje szybki sposób robienia tego?

Answer 1

Można użyć outer z paste, myślę, że będzie dość szybko!

as.vector(t(outer(x , y , "paste" ))) 
# [1] "considerably higher" "considerably lower" "much higher"   
# [4] "much lower"   "far higher"   "far lower" 

Answer 2

Można użyć expand.grid.

sort(apply(X = expand.grid(x, y), MARGIN = 1, FUN = function(x) paste(x[1], x[2], sep = " ")))