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