Obrigado Benilton!
 


De: beniltoncarvalho@gmail.com
Enviada: Sexta-feira, 22 de Agosto de 2014 23:58
Para: r-br@listas.c3sl.ufpr.br
Assunto: [R-br] DÚVIDA EXPAND.GRID

paste('(', apply(do.call(expand.grid, rep(list(POP1), 3)), 1, paste, collapse=','), ')', sep='')
 
onde vc ve^ um 3, vc troca por qtos vc quiser.
 
btw, codigo nao-testado
 
boa sorte


Em 22 de agosto de 2014 22:20, <andrebvs@bol.com.br> escreveu:
Olá pessoas,

Como faço pra generalizar a saída abaixo para mais de 2 amostras com reposição:

POP1  <- c(01,03,06,08,10)
COMB1 <- expand.grid(POP1,POP1)
Amostras <- cbind(paste("(",unlist(COMB1[2]),",",unlist(COMB1[1]),")",sep=""))
Amostras
 
E outra coisa, se eu quiser combinar amostras com reposição de tamanho 3 ou mais, terei que colocar por exemplo: expand.grid(POP1,POP1,POP1), não teria uma maneira mais simplificada de resolver isso não?

desde já grato!

Att.
André

_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.