<div dir="ltr">Existe ainda uma outra alternativa nesse caso que é o uso do data.table:<font face="yw-594c7e313746b22beb7af390dfee778f98af89b0-b70ae8b3ca1d13417117c1ef2a149f80--o" style></font><div><br></div><div><div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif">
<font color="#741b47" face="verdana, sans-serif">sexo=c("1","1","2","2","1","2","1","1","1","1","2")</font></div>
<div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><font color="#741b47" face="verdana, sans-serif">idade=c("1","3","2","1","1","1","2","2","3","3","3")</font></div>
<div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><span style="color:rgb(116,27,71);font-family:verdana,sans-serif">tcont=c(100,320,24,256,134,290,18,34,15,121,32)</span><br></div>
<div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><font color="#741b47" face="verdana, sans-serif">read=c("1","0","0","0","1","1","1","1","1","1","0")</font></div>
<div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><font color="#741b47" face="verdana, sans-serif">df=data.frame(sexo,idade,read,tcont)</font></div></div><div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif">
<font color="#741b47" face="verdana, sans-serif"><br></font></div><div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><font color="#741b47" face="verdana, sans-serif">require(data.table)</font></div>
<div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif"><font color="#741b47" face="verdana, sans-serif">dt <- data.table(df)</font></div><div class="gmail_default" style="font-size:13.333333969116211px;font-family:arial,sans-serif">
<span class="" style="border-collapse:separate;color:rgb(0,0,0);font-family:'Ubuntu Mono';font-size:14px;line-height:16px;white-space:pre-wrap;border-spacing:0px;background-color:rgb(225,226,229)"><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<span class="" style="color:blue">dt[,list(soma=sum(tcont), count=.N), by=list(idade,sexo)]</span></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<br></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">que é equivalente a :</pre>
<pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important"><br></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<span class="" style="border-collapse:separate;border-spacing:0px"><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<span class="" style="color:blue">ddply(dados, .(idade, sexo), summarize, soma=sum(tcont), count = length(tcont))</span></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<span class="" style="color:blue"><br></span></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<pre tabindex="0" class="" style="line-height:1.2;font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;font-size:10.4pt!important;white-space:pre-wrap!important">ambos com saída:</pre>
<pre tabindex="0" class="" style="line-height:1.2;font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;font-size:10.4pt!important;white-space:pre-wrap!important"><br></pre><pre tabindex="0" class="" style="line-height:1.2;font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;font-size:10.4pt!important;white-space:pre-wrap!important">
<span class="" style="border-collapse:separate;border-spacing:0px"><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
idade sexo soma count
1: 1 1 267 4
2: 2 2 570 3
3: 3 1 475 3</pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">
<br></pre><pre tabindex="0" class="" style="font-family:'Ubuntu Mono';outline:none;border:none;margin-top:0px;margin-bottom:0px;line-height:1.2;font-size:10.4pt!important;white-space:pre-wrap!important">O data.table tem uma grande vantagem sobre o plyr que é a velocidade. Quando o arquivo é muito grande ele pode chegar a ser 100x mais rápido.</pre>
</span></pre></pre></span></pre></span></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/10/11 Fátima Lima Paula <span dir="ltr"><<a href="mailto:fatima.lima.paula@gmail.com" target="_blank">fatima.lima.paula@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">Vinícius, não sei se é isso que você quer, mas eu fiz da seguinte forma:</div>
<div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">
<br></div><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)"><div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px"><font color="#741b47" face="verdana, sans-serif">sexo=c("1","1","2","2","1","2","1","1","1","1","2")</font></div>
<div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px"><font color="#741b47" face="verdana, sans-serif">idade=c("1","3","2","1","1","1","2","2","3","3","3")</font></div>
<div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px"><span style="color:rgb(116,27,71);font-family:verdana,sans-serif">tcont=c(100,320,24,256,134,290,18,34,15,121,32)</span><br>
</div><div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px"><font color="#741b47" face="verdana, sans-serif">read=c("1","0","0","0","1","1","1","1","1","1","0")</font></div>
<div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px"><font color="#741b47" face="verdana, sans-serif">df=data.frame(sexo,idade,read,tcont)</font></div><div class="gmail_default" style="color:rgb(34,34,34);font-family:arial,sans-serif;font-size:13.333333969116211px">
<font color="#741b47" face="verdana, sans-serif">df</font></div></div><div class="gmail_default">
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif"> sexo idade read tcont</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">1 1 1 1 100</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">2 1 3 0 320</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">3 2 2 0 24</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">4 2 1 0 256</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">5 1 1 1 134</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">6 2 1 1 290</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">7 1 2 1 18</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">8 1 2 1 34</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">9 1 3 1 15</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">10 1 3 1 121</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">11 2 3 0 32</font></div>
<div style="color:rgb(116,27,71);font-family:verdana,sans-serif"><br></div></div><div class="gmail_default"><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">lixo=do.call(rbind, by(df, list(df$sexo, df$idade), function(x) data.frame(sexo=x$sexo[1], idade=x$idade[1],</font></div>
<div class="gmail_default"><font color="#741b47" face="verdana, sans-serif"> tcont=mean(x$tcont), reads=sum(x$read == "1"))))</font></div><div>
<div><font color="#741b47" face="verdana, sans-serif"> sexo idade tcont reads</font></div><div><font color="#741b47" face="verdana, sans-serif">1 1 1 117 2</font></div><div><font color="#741b47" face="verdana, sans-serif">2 2 1 273 1</font></div>
<div><font color="#741b47" face="verdana, sans-serif">3 1 2 26 2</font></div><div><font color="#741b47" face="verdana, sans-serif">4 2 2 24 0</font></div><div><font color="#741b47" face="verdana, sans-serif">5 1 3 152 2</font></div>
<div><font color="#741b47" face="verdana, sans-serif">6 2 3 32 0</font></div><div style="color:rgb(116,27,71);font-family:verdana,sans-serif"><br></div></div></div><div class="gmail_extra"><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">
Acho que consegui pesquisando no google.</div><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">Abs</div><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">
Fátima</div><br><br><div class="gmail_quote">Em 10 de outubro de 2013 18:29, Vinicius Brito Rocha <span dir="ltr"><<a href="mailto:viniciusbritor@gmail.com" target="_blank">viniciusbritor@gmail.com</a>></span> escreveu:<div>
<div class="h5"><br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr">walmes, <div><br></div><div>uma pergunta. é possível ter diferentes funções no aggregate? uma para cada tipo de variável?</div>
<div><br></div><div>imagine quer contar em uma e somar em outra (como numa query padrão sql)</div>
<div><br></div><div>Abs</div><div><br></div><div>Vinicius</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 10 de outubro de 2013 18:11, walmes . <span dir="ltr"><<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div><div><div dir="ltr"><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif">
A aggregate() faz a mesma coisa de uma forma mais sofisticada.<br>
<br><span style="font-family:'courier new',monospace">aggregate(cbind(tcont,read)~sexo+idade,<br>
data=dados, FUN=sum)</span><br><br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif">Mais opções estão disponíveis com as funções do pacote plyr, como<br><br><span style="font-family:'courier new',monospace">require(plyr)<br>
ddply(dados, .(sexo,idade), summarise,<br> tcont=sum(tcont), read=sum(read))<br></span></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif"><br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif">
onde você pode usar funções diferentes para cada variável ou até usar mais de uma vez uma mesma variável.<br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif"><br></div><div class="gmail_default" style="font-family:'trebuchet ms',sans-serif">
À disposição.<br>Walmes.<br></div><div class="gmail_extra"><br clear="all"><div><div dir="ltr"><span style="font-family:'trebuchet ms',sans-serif">==========================================================================</span><br style="font-family:'trebuchet ms',sans-serif">
<span style="font-family:'trebuchet ms',sans-serif">Walmes Marques Zeviani</span><br style="font-family:'trebuchet ms',sans-serif"><span style="font-family:'trebuchet ms',sans-serif">LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family:'trebuchet ms',sans-serif">
<span style="font-family:'trebuchet ms',sans-serif">Departamento de Estatística - Universidade Federal do Paraná</span><br style="font-family:'trebuchet ms',sans-serif"><span style="font-family:'trebuchet ms',sans-serif">fone: <a href="tel:%28%2B55%29%2041%203361%203573" value="+554133613573" target="_blank">(+55) 41 3361 3573</a></span><br style="font-family:'trebuchet ms',sans-serif">
<span style="font-family:'trebuchet ms',sans-serif">skype: walmeszeviani<br style="font-family:'trebuchet ms',sans-serif"></span><span style="font-family:'trebuchet ms',sans-serif">homepage: <a href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family:'trebuchet ms',sans-serif">
<span style="font-family:'trebuchet ms',sans-serif">linux user number: 531218</span><br style="font-family:'trebuchet ms',sans-serif"><span style="font-family:'trebuchet ms',sans-serif">==========================================================================</span><br>
</div></div><br></div></div>
<br></div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">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.<span><font color="#888888"><br></font></span></blockquote>
</div><span><font color="#888888"><br><br clear="all"><div><br></div>-- <br>
<div dir="ltr"><i>Vinicius Brito Rocha.</i><br><i style="font-weight:bold">Estatístico e Atuário </i><i style="font-weight:bold"><br>M.Sc. Engenharia de Produção/PO</i><br><br><br></div>
</font></span></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">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.<br></blockquote></div></div></div><br><br clear="all"><div><br>
</div>-- <br><div class="im">
<div dir="ltr"><div><span style="color:rgb(103,78,167);font-family:'comic sans ms',sans-serif">"Minha felicidade depende da qualidade dos meus pensamentos"</span><br></div></div>
</div></div></div>
<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.<br></blockquote></div><br></div>