<div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">Jefferson, não sei se entendi sua dúvida, mas pensei em fazer:</div><div class="gmail_default" style="font-family:verdana,sans-serif;color:rgb(116,27,71)">
<br></div><div class="gmail_default"><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">aggregate(cotas$cota~data,data=cotas,mean)</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif"><br>
</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">Abs</font></div><div class="gmail_default"><font color="#741b47" face="verdana, sans-serif">Fátima</font></div><div style="color:rgb(116,27,71);font-family:verdana,sans-serif">
<br></div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 2 de agosto de 2013 16:50, Jefferson Ferreira Ferreira <span dir="ltr"><<a href="mailto:jecogeo@gmail.com" target="_blank">jecogeo@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><br><div class="gmail_extra">Com a função ddply(cotas,~cotas$mes_dia,summarise,mean=mean(cotas$cota),sd=sd(cotas$cota)) eu pareço estar chegando perto. Mas retorna todos as medias e todos desvios iguais.</div>
<div class="gmail_extra"><br></div><div class="gmail_extra">Para explicar com mais detalhe, o que precisava era calcular a media de todas os valores de cotas$cota cujos valores de cotas$mes_dia fossem iguais. Assim eu teria a cota média de cada dia do ano para uma serie de 20 anos.</div>
<div class="gmail_extra"><br></div><div class="gmail_extra">Se alguém souber dar uma luz....</div><div class="gmail_extra">Obrigado!</div><div class="gmail_extra"><br></div><div class="gmail_extra"><br></div><div class="gmail_extra">
-- <br><div dir="ltr"><div><p style="margin-bottom:0.0001pt"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><i><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(31,73,125)">Jefferson Ferreira Ferreira</span></i></b></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray">Geógrafo – GEOPROCESSAMENTO IDSM | Coordenadoria de TI</span></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray"><img><br>
</span></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-family:Calibri,sans-serif;font-size:11pt"><a href="mailto:Jefferson.ferreira@mamiraua.org.br" target="_blank">Jefferson.ferreira@mamiraua.org.br</a></span></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(3,69,20)">Instituto de Desenvolvimento Sustentável Mamirauá</span></b></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px"><font>Ministério da Ciência, Tecnologia e Inovação</font></p><p style="margin:0px"><font>Telefone: <a href="tel:%2B55%2097%203343-9710" value="+559733439710" target="_blank">+55 97 3343-9710</a></font></p>
<p style="margin:0px"></p><p style="margin:0px;font-family:tahoma,helvetica,sans-serif"><span style="font-family:arial,sans-serif;font-size:9pt"></span><b style="font-family:arial,sans-serif"><span style="font-size:9pt;font-family:Arial,sans-serif"><img>Google Maps</span></b><span style="font-size:9pt;font-family:Arial,sans-serif"> - Mapas deste e-mail</span><span style="font-family:arial,sans-serif;font-size:9pt">:</span></p>
<p style="margin:0px;font-family:tahoma,helvetica,sans-serif"></p><p style="margin:0px;font-family:arial,sans-serif"><a href="https://maps.google.com.br/maps?q=-3.355557,-64.731151&ll=-3.355471,-64.731145&spn=0.004632,0.006968&num=1&t=h&z=18" target="_blank"><span style="font-size:9pt;font-family:'Times New Roman',serif"><span style="color:blue"><img>Exibir <span style="background-color:rgb(255,255,204);color:rgb(34,34,34)">mapa</span> ampliado</span></span></a></p>
<p></p><p></p><i><br>Contatos particulares:</i></div><div><i><a href="tel:%2855%29%209615-0100" value="+15596150100" target="_blank">(55) 9615-0100</a><br>MSN: <a href="mailto:jecogeo@yahoo.com.br" target="_blank">jecogeo@yahoo.com.br</a></i> </div>
</div><br><div class="gmail_quote">Em 2 de agosto de 2013 15:10, Jefferson Ferreira Ferreira <span dir="ltr"><<a href="mailto:jecogeo@gmail.com" target="_blank">jecogeo@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 dir="ltr"><div><br></div><div>Pessoal;</div><div><br>
</div><div>Estou com um probleminha aparentemente simples. Espero que alguém possa me ajudar.</div><div><br></div><div>Tenho uma série temporal de dados, duas colunas (data e cota), de 20 anos. Estou precisando calcular a cota média de cada dia. (média dos dia 1/jan, 2/jan,....).</div>
<div><br></div><div>Minha coluna de data já está as.Date()</div><div><br></div><div><div>library("utils")</div><div><br></div><div>setwd("D:/JEFFERSON/Mapeamento/Dados Hidrológicos")<br></div><div>cotas <- read.table("cotas2.csv",sep=",",header=T,allowEscapes=T,)<br>
</div><div>as.Date(cotas$data,format="%d/%m/%Y")<br></div><div>cotas$dia <- as.Date(cotas$data,format="%d/%m/%Y")<br></div></div><div><br></div><div><br></div><div><br></div><div>Se alguém puder me ajudar, agradeço!!</div>
<div>Abração!</div><br clear="all"><div><br></div>-- <br><div dir="ltr"><div style="text-align:left"><p style="margin-bottom:0.0001pt;line-height:normal"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto">
<b><i><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(31,73,125)">Jefferson Ferreira Ferreira</span></i></b></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto">
<span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray">Geógrafo – GEOPROCESSAMENTO IDSM | Coordenadoria de TI</span></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto">
<span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray"><img><br></span></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto">
</p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-family:Calibri,sans-serif;font-size:11pt"><a href="mailto:Jefferson.ferreira@mamiraua.org.br" target="_blank">Jefferson.ferreira@mamiraua.org.br</a></span></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(3,69,20)">Instituto de Desenvolvimento Sustentável Mamirauá</span></b></p>
<p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px"><font><font>Ministério da Ciência, Tecnologia e Inovação</font></font></p><p style="margin:0px">
<font>Telefone: <a href="tel:%2B55%2097%203343-9710" value="+559733439710" target="_blank">+55 97 3343-9710</a></font></p><p style="margin:0px"></p><p style="color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;margin:0px">
<span style="font-family:arial,sans-serif;font-size:9pt"></span><b style="font-family:arial,sans-serif"><span style="font-size:9pt;font-family:Arial,sans-serif"><img>Google Maps</span></b><span style="font-size:9pt;font-family:Arial,sans-serif"> - Mapas deste e-mail</span><span style="font-family:arial,sans-serif;font-size:9pt">:</span></p>
<p style="color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;margin:0px"></p><p style="color:rgb(34,34,34);font-family:arial,sans-serif;margin:0px">
<a href="https://maps.google.com.br/maps?q=-3.355557,-64.731151&ll=-3.355471,-64.731145&spn=0.004632,0.006968&num=1&t=h&z=18" style="color:rgb(17,85,204)" target="_blank"><span style="font-size:9pt;font-family:'Times New Roman',serif"><span style="color:blue"><img>Exibir <span style="background-color:rgb(255,255,204);color:rgb(34,34,34)">mapa</span> ampliado</span></span></a></p>
<p></p><p></p><i><br>Contatos particulares:</i></div><div style="text-align:left"><i><a href="tel:%2855%29%209615-0100" value="+15596150100" target="_blank">(55) 9615-0100</a><br>MSN: <a href="mailto:jecogeo@yahoo.com.br" target="_blank">jecogeo@yahoo.com.br</a></i>
<br></div></div>
</div>
</blockquote></div><br><br clear="all"><div><br></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><br clear="all"><div><br></div>-- <br>
<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>