str_c avec répétition

[VERDIER Guillaume]

Bonjour,
Comment concatener deux chaines avec répétition, comme suit

Code : Tout sélectionner

x <- c("a", "b", "c")
y <- c("u", "v", "w")


str_c(x,y) renvoit "au" "bv" "cw" alors que je voudrais obtenir "au" "av" "aw" "bu" "bv" "bw" "cu" "cv" "cw"
Merci d'avance

[Pierre-Yves Berrard]

Une idée (pas très jolie) :

Code : Tout sélectionner

apply(expand.grid(x, y), 1, paste, collapse = "") 

[VERDIER Guillaume]

merci ça fonctionne parfaitement - l'absence de beauté de ce code m'échappe totalement je l'avoue :)

[Pierre-Yves Berrard]

C'est juste qu'en général, je n'utilise `apply` qu'en dernier recours...

Sinon, je ne sais pas si l'ordre est important, mais si vous voulez celui de votre message initial, ce serait plutôt :

Code : Tout sélectionner

apply(expand.grid(y, x), 1, function(.) paste0(.[2], .[1])) 

[Logez Maxime]

Bonjour,

Dans le même genre tu as la fonction outer :

Code : Tout sélectionner

sort(outer(x, y, paste0))
[1] "au" "av" "aw" "bu" "bv" "bw" "cu" "cv" "cw"

Cordialement,
Maxime