É isso mesmo!<br><br><div class="gmail_quote">2012/7/29 Pedro Rafael <span dir="ltr"><<a href="mailto:pedro.rafael.marinho@gmail.com" target="_blank">pedro.rafael.marinho@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">

Se quiser uma outra combinação colocar dados[as.vector(colunas_combinadas[,2])]<br>
<div class="im">[   ],<br>
Pedro Rafael Diniz Marinho.<br>
<br>
<br>
</div>Em 29 de julho de 2012 19:55, Pedro Rafael<br>
<<a href="mailto:pedro.rafael.marinho@gmail.com">pedro.rafael.marinho@gmail.com</a>> escreveu:<br>
<div class="HOEnZb"><div class="h5">> dados = read.table("dados_teste.txt",header=TRUE)<br>
> nomes_das_colunas = as.vector(colnames(dados))<br>
> colunas_combinadas = combn(nomes_das_colunas,6)<br>
> dados[as.vector(colunas_combinadas[,1])]<br>
> [   ],<br>
> Pedro Rafael Diniz Marinho.<br>
><br>
><br>
> Em 29 de julho de 2012 19:47, andrebvs [via R-br]<br>
> <<a href="mailto:ml-node%2Bs2285057n4655711h18@n4.nabble.com">ml-node+s2285057n4655711h18@n4.nabble.com</a>> escreveu:<br>
>> Olá Luciano!<br>
>><br>
>> A dúvida é a seguinte:<br>
>> 1º) Tenho o seguinte banco de dados abaixo:<br>
>><br>
>><br>
>> Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12<br>
>> 1     1  0   3   1   0   0   0   1   0    1    0    1<br>
>> 2     1  3   0   0   1   1   0   1   1    0    2    1<br>
>> 3     0  2   1   0   0   1   3   0   0    1    0    0<br>
>> 4     1  0   0   2   2   1   0   0   0    0    2    1<br>
>> 5     0  2   1   0   1   2   0   1   1    1    0    2<br>
>> 6     1  1   0   1   1   0   3   1   2    1    1    0<br>
>> 7     1  1   0   1   1   0   0   0   0    1    1    1<br>
>> 8     0  1   0   1   0   1   2   0   2    0    3    0<br>
>> 9     1  2   3   1   2   0   0   0   0    2    0    1<br>
>> 10    0  1   0  1   0   0   1   0   1    1    0    2<br>
>><br>
>> 2º) Quero combinar todas as 12 colunas tomadas 6 à 6, fazendo as contas<br>
>> terei 924 combinações possivéis, e uma combinação possível seria, por<br>
>> exemplo a seguinte:<br>
>><br>
>> Q1  Q4  Q7 Q8 Q9  Q12<br>
>> 1     1    1    0   1   0    1<br>
>> 2     1    0    0   1   1    1<br>
>> 3     0    0    3   0   0    0<br>
>> 4     1    2    0   0   0    1<br>
>> 5     0    0    0   1   1    2<br>
>> 6     1    1    3   1   2    0<br>
>> 7     1    1    0   0   0    1<br>
>> 8     0    1    2   0   2    0<br>
>> 9     1    1    0   0   0    1<br>
>> 10    0   1    1   0   1     2<br>
>><br>
>> Repare que, das 12 colunas iniciais, tenho essa última com 6 colunas, a qual<br>
>> é uma possível combinação das 924. Então, como extrair todas as 924<br>
>> combinações da matriz inicial?<br>
>><br>
>> 3º) Após isso, ou seja, após ter encontrado todas as 924 combinações,<br>
>> gostaria também, que tivesse um vetor q ue me retorne a soma de cada linha<br>
>> de cada combinação. Por exemplo:<br>
>><br>
>> combinação1<br>
>> combinação924<br>
>> Q1  Q4  Q7 Q8 Q9  Q12    soma das linhas          . . . Q6  Q1  Q11  Q2 Q9<br>
>> Q7          soma das linhas<br>
>> 1     1    1    0   1   0    1            4<br>
>> 0                                                 2<br>
>> 2     1    0    0   1   1    1            4<br>
>> 1                                                 3<br>
>> 3     0    0    3   0   0    0            3                              � �<br>
>> 3                                                 5<br>
>> 4     1    2    0   0   0    1            4<br>
>> 3                                                 1<br>
>> 5     0    0    0   1   1    2            4<br>
>> .                                                  .<br>
>> 6     1    1    3   1   2    0            8<br>
>> .                                                  .<br>
>> 7     1    1    0   0   0    1            3                               �<br>
>> �     .                                                  .<br>
>> 8     0    1    2   0   2    0            5<br>
>> etc                                              etc<br>
>> 9     1    1    0   0   0    1            3<br>
>> 10    0   1    1   0   1     2            5<br>
>><br>
>> desde já agradeço!<br>
>><br>
>><br>
>> ________________________________<br>
>> Em 29/07/2012 19:04, Luciano F. Sgarbi < [hidden email] > escreveu:<br>
>> Boa tarde.<br>
>> Tentei, mas não entendi sua pergunta.<br>
>> Você pode ser um pouco mais especifico?<br>
>> Abraços<br>
>><br>
>> 2012/7/29 andrebvs <andrebvs@...><br>
>>><br>
>>> Olá pessoal, gostaria de saber como faço para combinar essas 12 colunas<br>
>>> (Q1 até Q12) tomados 6 à 6 colunas:<br>
>>><br>
>>> Q1 Q2 Q3 Q4 Q5 Q6 Q7 Q8 Q9 Q10 Q11 Q12<br>
>>> 1     1  0   3   1   0   0   0   1   0    1    0    1<br>
>>> 2     1  3   0   0   1   1   0   1   1    0    2    1<br>
>>> 3     0  2   1   0   0   1   3   0   0    1    0    0<br>
>>> 4     1  0   0   2   2   1   0   0   0    0    2    1<br>
>>> 5     0  2   1   0   1   2   0   1   1    1    0    2<br>
>>> 6     1  1   0   1   1   0   3   1   2    1    1    0<br>
>>> 7     1  1   0   1   1   0   0   0   0    1    1    1<br>
>>> 8     0  1   0   1   0   1   2   0   2    0    3    0<br>
>>> 9     1  2   3   1   2   0   0   0   0    2    0    1<br>
>>> 10    0  1 � � 0  1   0   0   1   0   1    1    0    2<br>
>>><br>
>>> desde já agradeço!<br>
>>><br>
>>> Att.<br>
>>> André<br>
>>><br>
>>><br>
>>> _______________________________________________<br>
>>> R-br mailing list<br>
>>> R-br@...<br>
>>><br>
>>> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
>>> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça<br>
>>> código mínimo reproduzível.<br>
>><br>
>><br>
>><br>
>> --<br>
>> Luciano F. Sgarbi<br>
>> Mestrando em Ecologia e Evolução - UFG<br>
>><br>
>> Laboratório de Ecologia de Insetos<br>
>> Cel. <a href="tel:%2862%298174-2262" value="+556281742262">(62)8174-2262</a>   Lab. <a href="tel:%2862%293521-1732" value="+556235211732">(62)3521-1732</a><br>
>><br>
>><br>
>><br>
>><br>
>><br>
>><br>
>><br>
>> _______________________________________________<br>
>> R-br mailing list<br>
>> [hidden email]<br>
>> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
>> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código<br>
>> mínimo reproduzível.<br>
>><br>
>> ________________________________<br>
>> If you reply to this email, your message will be added to the discussion<br>
>> below:<br>
>> <a href="http://r-br.2285057.n4.nabble.com/R-br-Combinar-colunas-de-um-banco-de-dados-tp4655709p4655711.html" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-Combinar-colunas-de-um-banco-de-dados-tp4655709p4655711.html</a><br>


>> To unsubscribe from R-br, click here.<br>
>> NAML<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</div></div></blockquote></div><br><br clear="all"><div><br></div>

-- <br><blockquote style="margin:0 0 0 40px;border:none;padding:0px"></blockquote><span style="color:rgb(51,51,51);font-family:'Arial Narrow',sans-serif">Luciano
F. Sgarbi</span><br><blockquote style="margin:0 0 0 40px;border:none;padding:0px"></blockquote><font color="#333333" face="'Arial Narrow', sans-serif">Mestrando em Ecologia e Evolução - UFG</font><br><blockquote style="margin:0 0 0 40px;border:none;padding:0px">

</blockquote><span style="color:rgb(51,51,51);font-family:'Arial Narrow',sans-serif">Laboratório
de Ecologia de Insetos</span><br><blockquote style="margin:0 0 0 40px;border:none;padding:0px"></blockquote><div><span style="color:rgb(51,51,51);font-family:'Arial Narrow',sans-serif">Cel.
(62)8174-2262   Lab. (62)3521-1732</span><div>

<p></p><p></p></div>
<div style="display:inline"></div></div><br>