Combinaisons possibles entre éléments d'un vecteur

[Anthony Sturbois]

Bonjour
Je rencontre un petit soucis que je n'arrive pas à résoudre seul.
J'ai un vecteur de ce type

X<-c("t1","t2","t3","t4","t5")

J'essaie d'obtenir l'ensemble des n combinaisons entre les éléments de ce vecteur [n<-(length(c)*(length(c)-1))/2]
et de coller le résultat dans un un vecteur contenant : t1t2,t1t3,t1t4,t1t5,t2t3,t2t4,t2t5,t3t4,t3t5,t4t5

J'ai fais des tentatives avec la fonction cmbn(), mais je n'arrive pas au résultat escompté.

Des idées?

merci d'avance

Anthony

[Fred Santos]

Salut,

Tu étais sur la bonne voie avec combn() :

Code : Tout sélectionner

> X <- c("t1", "t2", "t3", "t4", "t5")
> comb <- combn(X, 2)
> comb
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] "t1" "t1" "t1" "t1" "t2" "t2" "t2" "t3" "t3" "t4"
[2,] "t2" "t3" "t4" "t5" "t3" "t4" "t5" "t4" "t5" "t5"


Si je comprends bien, il suffit désormais de faire ça ?

Code : Tout sélectionner

> paste0(comb[1,], comb[2,])
 [1] "t1t2" "t1t3" "t1t4" "t1t5" "t2t3" "t2t4" "t2t5" "t3t4"
 [9] "t3t5" "t4t5"

[Anthony Sturbois]

Oui c'est ça!!! merci
je venais de trouver une solution quoi fonctionne mais beaucoup plus longue avec trois boucles et sans combn() :-/
J'avais bloqué sur la sélection dans le return de combn effectivement
merci!

[Logez Maxime]

Bonjour,

juste une précision, la fonction combn permet l'utilisation d'une fonction directement :

Code : Tout sélectionner

combn(X, 2, FUN = function(x) paste(x, collapse=""))

Après c'est pas dit que ce soit plus rapide ...

Cordialement,
Maxime