Obrigado Paulo Justiniano pela resposta, problema 1 resolvido. Agora, como acrescentar (nesses comandos apply) algum comando que elimine valores repetidos em cada vetor combinado?<br /><br /><em>Att.<br />André</em><br /><br />
<hr style="border-top: 1px solid #ccc;" />
Em 27/05/2012 23:59, <strong>Paulo Justiniano < paulojus@leg.ufpr.br ></strong> escreveu:<br />ap0 <- combn(1:10, 4)<br />ap1 <- apply(ap, 2, function(x) paste("vet", x, sep="")) <br />ap2 <- apply(ap1, 2, function(x) unname(unlist(sapply(x, get))))<br /><br />ap2 contem uma lista dos vetores<br /><br /><br />On Sun, 27 May 2012, andrebvs wrote:<br /><br />> Olá pessoal, gostaria de saber como combinar vetores de tamanhos diferentes, por exemplo:<br />> <br />> vet1 <- c(02,03,04,05,06,07,08,10,30,50,70,90)<br />> vet2 <- c(10,11,13,14,15,16,17,18,19,31,51,71,91)<br />> vet3 <- c(02,22,23,24,25,26,27,28,42,62,82)<br />> vet4 <- c(03,13,23,30,31,33,34,35,36,37,38,39,43,53,63,73,83,93)<br />> vet5 <- c(04,14,24,34,42,43,44,45,46,47,48,54,64,74,84,94)<br />> vet6 <- c(05,15,25,35,45,50,51,53,54,55,56,57,58,59,65,75,85,95)<br />> vet7 <- c(06,16,26,36,46,56,62,63,64,65,66,67,68,76,86,96)<br />> vet8 <- c(07,17,
 27,37,47,57,67,70,71,73,74,75,76,77,78,79,87,97)<br />> vet9 <- c(08,18,28,38,48,58,68,78,82,83,84,85,86,87,88,98)<br />> vet10 <- c(19,39,59,79,90,91,93,94,95,96,97,98,99)<br />> <br />> uma combinação seria, por exemplo: vet1,vet2,vet7,vet10, me retornaria o seguinte:<br />> <br />> 02,03,04,05,06,07,08,10,30,50,70,90,10,11,13,14,15,16,17,18,19,31,51,71,91,06,16,26,36,46,56,62,63,64,65,66,67,68,7<br />> 6,86,96,<br />> 19,39,59,79,9 0,91,93,94,95,96,97,98,99.<br />> <br />> então, quero combinar vetores tomandos 4 a 4 nesses 10 vetores, desde modo, terei um total de 210 vetores combinados<br />> ao todo.<br />> Se não for pedir muito, gostaria tb que tais resultados nao viessem com números repetidos.<br />> <br />> desde já agradeço.<br />> <br />> Att.<br />> André<br />> <br />><br /><br />