Generar permutaciones utilizando el Algoritmo de Heap
Estoy intentando generar todas las permutaciones para un arreglo utilizando el algoritmo de Heap que encontré en Wikipedia. Esto es lo que he intentado hasta ahora: n <- 3 A <- c(1, 2, 3) perm <- function(n, A) { if (n == 1) print(perm) for (i in length(A)) perm(n, A . . . Read more