Hola David,
¿Seguro que buscas las combinaciones?
Creo que lo que buscas es esto...
#----------------
MuestraS <- c(1 ,1, 1, 1, 0, 1, 1, 0, 1, 1)
library(combinat)
resPer <- permn(MuestraS)
matresPer <- matrix(unlist(resPer), nrow=factorial(length(MuestraS)),
ncol=length(MuestraS))
head(matresPer)
#----------------
Que produce esto:
> matresPer <- matrix(unlist(resPer), nrow=factorial(length(MuestraS)),
ncol=length(MuestraS))
> head(matresPer)
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
[1,] 1 1 0 1 1 1 1 0 1 1
[2,] 1 1 1 0 1 1 1 1 0 1
[3,] 1 0 1 1 1 1 0 1 1 1
[4,] 1 1 1 1 0 1 1 1 1 0
[5,] 0 1 1 1 1 0 1 1 1 1
[6,] 1 1 1 1 1 1 1 1 1 1
Cuidado que el objeto "resPer" es una lista de 3628800 elementos... 609.1Mb
que como matriz sólo ocupa 276.9Mb.
Saludos,
Carlos Ortega
www.qualityexcellence.es
El 2 de marzo de 2015, 22:51, David Contreras <[email protected]>
escribió:
> Buena tarde amigos,
>
> En días pasados hice algunas consultas y ya pude salir de las dudas que
> tenia en ese momento, ahora requiero de su colaboración con lo siguiente:
>
> Tengo un vector dicotomico (Binario) con la siguiente información que me
> surgio de algunos procesos anteriores:
>
> > MuestraS
> [1] 1 1 1 1 0 1 1 0 1 1
>
> Ahora necesito hallar todas las posibles combinaciones que se puedan hacer
> con estos elementos para luego hacer un muestro aleatorio simple con
> reemplazo y seleccionar algunas de las posibles muestras que se obtengan.
>
> Agradezco me puedan ayudar con este asunto
>
> Saludos,
>
> DC.
>
> [[alternative HTML version deleted]]
>
> _______________________________________________
> R-help-es mailing list
> [email protected]
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
--
Saludos,
Carlos Ortega
www.qualityexcellence.es
[[alternative HTML version deleted]]
_______________________________________________
R-help-es mailing list
[email protected]
https://stat.ethz.ch/mailman/listinfo/r-help-es