Muito bom... 2012/7/31 Fabio Mathias Corrêa <fabio.ufla@yahoo.com.br>
Isso mesmo!
Veja o help!
?array ?apply
Fábio Mathias Corrêa
Universidade Estadual de Santa Cruz Departamento de Ciências Exatas e da Terra - DCET
Campus Soane Nazaré de Andrade, km 16 Rodovia Ilhéus-Itabuna CEP 45662-900. Ilhéus-Bahia
Tel.: 73-3680-5076 ------------------------------ *De:* andrebvs <andrebvs@bol.com.br>
*Para:* r-br@listas.c3sl.ufpr.br *Enviadas:* Terça-feira, 31 de Julho de 2012 13:22 *Assunto:* Re: [R-br] Combinar colunas de um banco de dados...
obg Luciano!
------------------------------ Em 30/07/2012 09:24, *Luciano F. Sgarbi < luciano.f.sgarbi@gmail.com >*escreveu: #Seria isso: data<-read.table('clipboard',h=T)##esse é aquela matriz de 12 colunas combinations<-combn(colnames(data),6) loop<-ncol(combinations) resu<-matrix(0,10,loop) colnames(resu)<-paste(rep("comb",loop),"_",1:loop,sep="") rownames(resu)<-paste(rep("row",10),"_",1:10,sep="") for(i in 1:loop){ resu[,i]<-rowSums(data[,combinations[,i]]) } resu
2012/7/29 andrebvs <andrebvs@bol.com.br<http://mce_host/compose?to=andrebvs@bol.com.br>
Obg colegas!
Agora, tem como somar as linhas de cada combinação? De forma que eu tenha um resultado geral do tipo:
C1Â C2Â C3Â ... C924 [1,]Â Â Â 5Â Â 5 [1,] Â Â 6Â Â 5 [1,] Â Â 4Â Â 6 [1,] Â Â 6Â Â 5 [1,]Â Â Â 6Â Â 4 [1,] Â Â 4Â Â 7 [1,]Â Â Â 4Â Â 7 [1,] Â Â 3Â Â 8 [1,] Â Â 9Â Â 8 [1,] Â Â 2 Â 6
. . . [1265,]
*thanks!*
------------------------------ Em 29/07/2012 20:01, *Luciano F. Sgarbi < luciano.f.sgarbi@gmail.com<http://mce_host/compose?to=luciano.f.sgarbi@gmail.com>> * escreveu: É isso mesmo!
2012/7/29 Pedro Rafael <pedro.rafael.marinho@gmail.com<http://mce_host/compose?to=pedro.rafael.marinho@gmail.com>
Se quiser uma outra combinação colocar dados[as.vector(colunas_combinadas[,2])] [  ], Pedro Rafael Diniz Marinho.
Em 29 de julho de 2012 19:55, Pedro Rafael <pedro.rafael.marinho@gmail.com<http://mce_host/compose?to=pedro.rafael.marinho@gmail.com>> escreveu:
dados = read.table("dados_teste.txt",header=TRUE) nomes_das_colunas = as.vector(colnames(dados)) colunas_combinadas = combn(nomes_das_colunas,6) dados[as.vector(colunas_combinadas[,1])] [ Â ],
Pedro Rafael Diniz Marinho.
Em 29 de julho de 2012 19:47, andrebvs [via R-br] <ml-node+s2285057n4655711h18@n4.nabble.com<http://../undefined/compose?to=ml-node>> escreveu:
Olá Luciano!
A dúvida é a seguinte: 1º) Tenho o seguinte banco de dados abaixo:
Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12 1 Â Â 1 Â 0 Â 3 Â 1 Â 0 Â 0 Â 0 Â 1 Â 0 Â Â 1 Â Â 0 Â Â 1 2 Â Â 1 Â 3 Â 0 Â 0 Â 1 Â 1 Â 0 Â 1 Â 1 Â Â 0 Â Â 2 Â Â 1 3 Â Â 0 Â 2 Â 1 Â 0 Â 0 Â 1 Â 3 Â 0 Â 0 Â Â 1 Â Â 0 Â Â 0 4 Â Â 1 Â 0 Â 0 Â 2 Â 2 Â 1 Â 0 Â 0 Â 0 Â Â 0 Â Â 2 Â Â 1 5 Â Â 0 Â 2 Â 1 Â 0 Â 1 Â 2 Â 0 Â 1 Â 1 Â Â 1 Â Â 0 Â Â 2 6 Â Â 1 Â 1 Â 0 Â 1 Â 1 Â 0 Â 3 Â 1 Â 2 Â Â 1 Â Â 1 Â Â 0 7 Â Â 1 Â 1 Â 0 Â 1 Â 1 Â 0 Â 0 Â 0 Â 0 Â Â 1 Â Â 1 Â Â 1 8 Â Â 0 Â 1 Â 0 Â 1 Â 0 Â 1 Â 2 Â 0 Â 2 Â Â 0 Â Â 3 Â Â 0 9 Â Â 1 Â 2 Â 3 Â 1 Â 2 Â 0 Â 0 Â 0 Â 0 Â Â 2 Â Â 0 Â Â 1 10 Â Â 0 Â 1 Â 0 Â 1 Â 0 Â 0 Â 1 Â 0 Â 1 Â Â 1 Â Â 0 Â Â 2
2º) Quero combinar todas as 12 colunas tomadas 6 à 6, fazendo as
contas
terei 924 combinações possivéis, e uma combinação possÃvel seria, por exemplo a seguinte:
Q1  Q4  Q7 Q8 Q9  Q12 1   1   1   0  1  0   1 2   1   0   0 Â  1  1   1
3 Â Â 0 Â Â 0 Â Â 3 Â 0 Â 0 Â Â 0 4 Â Â 1 Â Â 2 Â Â 0 Â 0 Â 0 Â Â 1 5 Â Â 0 Â Â 0 Â Â 0 Â 1 Â 1 Â Â 2 6 Â Â 1 Â Â 1 Â Â 3 Â 1 Â 2 Â Â 0 7 Â Â 1 Â Â 1 Â Â 0 Â 0 Â 0 Â Â 1 8 Â Â 0 Â Â 1 Â Â 2 Â 0 Â 2 Â Â 0 9 Â Â 1 Â Â 1 Â Â 0 Â 0 Â 0 Â Â 1 10 Â Â 0 Â 1 Â Â 1 Â 0 Â 1 Â Â 2
Repare que, das 12 colunas iniciais, tenho essa última com 6 colunas, a qual é uma possÃvel combinação das 924. Então, como extrair todas as 924 combinações da matriz inicial?
3º) Após isso, ou seja, após ter encontrado todas as 924 combinações, gostaria também, que tivesse um vetor q ue me retorne a soma de cada linha de cada combinação. Por exemplo:
combin ação1 combinação924 Q1  Q4  Q7 Q8 Q9  Q12   soma das linhas      . . . Q6  Q1  Q11  Q2 Q9 Q7      soma das linhas 1   1   1   0  1  0   1       4 0                         2 2   1   0   0  1  1   1       4 1                         3 3   0   0   3  0  0   0       3                � � 3                         5 4   1   2   0  0  0   1       4 3                         1 5   0   0   0  1  1   2       4 &g t;> .                          .
6   1   1   3  1  2   0       8 .                          . 7   1   1   0  0  0   1       3                � �   .                          . 8   0   1   2  0  2   0       5 etc                        etc 9   1   1   0  0  0   1       3 10   0  1   1  0  1   2       5
desde já agradeço!
________________________________ Em 29/07/2012 19:04, Luciano F. Sgarbi < [hidde n email] > escreveu:
Boa tarde.
Tentei, mas não entendi sua pergunta. Você pode ser um pouco mais especifico? Abraços
2012/7/29 andrebvs
Olá pessoal, gostaria de saber como faço para combinar essas 12
colunas
(Q1 até Q12) tomados 6 à 6 colunas:
Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12 1   1  0  3  1  0  0  0  1  0   1   0   1 2   1  3  0  0  1  1  0  1  1   0   2   1 3   0  2  1  0  0  1  3  0  0   1   0   0 4   1  0  0  2  2  1  0  0  0   0   2   1 5   0  2  1  0  1  2  0  1  1   1   0   2 6   1  1  0  1  1  0  3  1 Â  2   1   1 Â
 0
7   1  1  0  1  1  0  0  0  0   1   1   1 8   0  1  0  1  0  1  2  0  2   0   3   0 9   1  2  3  1  2  0  0  0  0   2   0   1 10   0  1 � � 0  1  0  0  1  0  1   1   0   2
desde já agradeço!
Att. André
_______________________________________________ R-br mailing list R-br@...
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.b r/r-br-guia<http://www.leg.ufpr.br/r-br-guia>) e forneça
código mÃnimo reproduzÃvel.
-- Luciano F. Sgarbi
Mestrando em Ecologia e Evolução - UFG
Laboratório de Ecologia de Insetos
Cel. (62)8174-2262 Lab. (62)3521-1732
_______________________________________________ R-br mailing list [hidden email] 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.
________________________________ If you reply to this email, your message will be added to the discussion below:
http://r-br.2285057.n4.nabble.com/R-br-Combinar-colunas-de-um-banco-de-dados...
To unsubscribe from R-br, click here. NAML
R-br mailing list R-br@listas.c3sl.ufpr.br<http://mce_host/compose?to=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<http://www.leg.ufpr.br/r-br-guia>) e forneça código mÃnimo reproduzÃvel.
-- Luciano F. Sgarbi Mestrando em Ecologia e Evolução - UFG Laboratório de Ecologia de Insetos Cel. (62)8174-2262 Lab. (62)3521-1732  Â
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br<http://mce_host/compose?to=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.
-- Luciano F. Sgarbi Mestrando em Ecologia e Evolução - UFG
Laboratório de Ecologia de Insetos Cel. (62)8174-2262  Lab. (62)3521-1732  Â
_______________________________________________ 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.
-- Luciano F. Sgarbi Mestrando em Ecologia e Evolução - UFG Laboratório de Ecologia de Insetos Cel. (62)8174-2262 Lab. (62)3521-1732