Sélectionner tous les tuples possibles à partir d'un vecteur dans R

J'essaie d'écrire un programme dans R qui, quand un vecteur est donné, renverra tous les éléments tuples possibles de ce vecteur. Exemple: tuples (c ('a', 'b', 'c')) = c ('a', 'b', 'c'); taxi'); c («a», «c»), c («b», «c»); Californie'); c ('b'); c ('c')Sélectionner tous les tuples possibles à partir d'un vecteur dans R

Je pense qu'il devrait retourner une liste de vecteurs.

Pour référence, voici un program that does a similar function in Stata.

Source

2011-03-09 Zach

Vous pouvez utiliser combn:

x <- 1:3 
unlist(lapply(x, function(n) combn(x, n, simplify=FALSE)), recursive=FALSE)

Source

2011-03-09 01:52:47

Impressionnant, merci. Que faire si x <- c ('a', 'b', 'c')? – Zach

@Zach, dans le cas général où x peut être de n'importe quelle classe, vous pouvez traiter cela comme travaillant sur les indices de x, puis utiliser le résultat pour indexer x. X_orig <- c ('a', 'b', 'c'); x <- seq_along (X_orig); xi <- (ci-dessus); lapply (xi, fonction (i) X_orig [i]) –

pas besoin de ça. 'x <- lettres [1: 3]' et ensuite vous faites le lapply sur '1: longueur (x)'. Fonctionne aussi bien. –

Sélectionner tous les tuples possibles à partir d'un vecteur dans R

Répondre

Questions connexes