<html><head><style>
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph {
margin-top:0in;
margin-right:0in;
margin-bottom:0in;
margin-left:.5in;
margin-bottom:.0001pt;
}
p.MsoListParagraphCxSpFirst, li.MsoListParagraphCxSpFirst, div.MsoListParagraphCxSpFirst, p.MsoListParagraphCxSpMiddle, li.MsoListParagraphCxSpMiddle, div.MsoListParagraphCxSpMiddle, p.MsoListParagraphCxSpLast, li.MsoListParagraphCxSpLast, div.MsoListParagraphCxSpLast {
margin-top:0in;
margin-right:0in;
margin-bottom:0in;
margin-left:.5in;
margin-bottom:.0001pt;
line-height:115%;
}
</style></head><body><div style="font-family:Calibri,'Segoe UI',Meiryo,'Microsoft YaHei UI','Microsoft JhengHei UI','Malgun Gothic','Khmer UI','Nirmala UI',Tunga,'Lao UI',Ebrima,sans-serif;font-size:16px">
<div>Boa tarde, pessoal!</div><div> </div><div>Consegui realizar. Obrigado pela ajuda de vocês.</div><div> </div><div>Grande abraço</div><div>Giovane P. Azambuja</div><div><div> </div><div>Enviado do Email do Windows</div>
<div> </div></div> <div style="border-top-color:rgb(225,225,225);border-top-width:1px;border-top-style:solid"> <strong>De:</strong> Luis Iván Ortiz Valencia<br> <strong>Enviado:</strong> 22 de novembro de 2012 12:33<br>
<strong>Para:</strong> <a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a><br> <strong>Assunto:</strong> Re: [R-br] Criando Rotina<br> </div> <div> </div>Como sao varios objetos, pode criar uma lista contendo esse objetos, depois pode chamar ( com o for ) um a um os elementos da lista(objetos) e fazer o summary.<div>
<br></div><div>Ivan<br><br><div class=" gmail_quote">Em 22 de novembro de 2012 12:27, Alisson Lucrecio <span dir="ltr"><<a tabindex="-1" href="mailto:alissonluc@yahoo.com.br" target="_blank">alissonluc@yahoo.com.br</a>></span> escreveu:<br>
<blockquote class=" gmail_quote" style="margin:0px 0px 0px 0.8ex;padding-left:1ex;border-left-color:rgb(204,204,204);border-left-width:1px;border-left-style:solid"><div><div style="font-family:times new roman,new york,times,serif;font-size:12pt">
<div style="font-family:"times new roman","new york",times,serif;font-size:12pt">
<span>Use o pacote plyr e ver do for.</span></div><div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent"><br></div><div style="background-color:transparent">
<span style="background-color:transparent"><font face="times new roman, new york, times, serif"><div style="background-color:transparent"># exemplo para fazer uma aov</div><div style="background-color:transparent"><br></div>
<div style="background-color:transparent">list.dados <- lapply(data[,-c(1)], function(y){</div><div style="background-color:transparent"> dm <- data[,c(1)]</div><div style="background-color:transparent"> y <- y</div>
<div style="background-color:transparent"> dfm <- cbind(dm, y)</div><div style="background-color:transparent"> return(list(</div><div style="background-color:transparent"> dm = dm,</div><div style="background-color:transparent">
y = y,</div><div style="background-color:transparent"> dfm = dfm))</div><div style="background-color:transparent">})</div><div style="background-color:transparent"><br></div><div style="background-color:transparent">
list.av <- llply(list.dados, function(list){</div><div style="background-color:transparent"> with(list, aov(y ~ trar, data=dfm))</div><div style="background-color:transparent">})</div><div style="background-color:transparent">
<br></div><div style="background-color:transparent">list.anova <- lapply(list.av, anova)</div></font></span></div><div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent">
<span style="font-size:12pt;background-color:transparent"><br></span></div><div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent">
<span style="font-size:12pt;background-color:transparent"><br>
</span></div><div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent"><span style="font-size:12pt;background-color:transparent"><br>
</span></div>
<div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent"><span style="font-size:12pt;background-color:transparent"><br></span></div>
<div style="font-family:"times new roman","new york",times,serif;font-size:16px;font-style:normal;background-color:transparent">
<span style="font-size:12pt;background-color:transparent"> </span></div><div style="font-family:"times new roman","new york",times,serif;font-size:12pt"><font face="times new roman, new york, times, serif">Alisson Lucrécio da Costa</font><br>
</div> <div style="font-family:"times new roman","new york",times,serif;font-size:12pt"> <div style="font-family:"times new roman","new york",times,serif;font-size:12pt"> <div dir="ltr">
<font face="Arial"> <hr size="1">
<b><span style="font-weight:bold">From:</span></b> Giovane Pretto Azambuja <<a tabindex="-1" href="mailto:gibuja@gmail.com" target="_blank">gibuja@gmail.com</a>><br> <b><span style="font-weight:bold">To:</span></b> "<a tabindex="-1" href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>" <<a tabindex="-1" href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>> <br>
<b><span style="font-weight:bold">Sent:</span></b> Thursday, November 22, 2012 11:47 AM<br> <b><span style="font-weight:bold">Subject:</span></b> [R-br] Criando Rotina<br>
</font> </div><div><div> <br>
<div><div><div>
<div>
<div>Olá, pessoal<br><br> Sou um pouco novato em R, mas vamos tentar.<br> Tenho de fazer a análise estatística, pela função summary(), de uma pancada<br> de objetos. Gostaria de saber se existe uma maneira em que o R faça essas análises, e as armazene em um objeto diferente para cada análise, de maneira automática. Tipo uma rotina.</div>
<div>Creio que consigo fazer isso com o comando for, porém como são vários objetos não me veio em mente como organiza-lo.</div><div> </div><div>OBS: Não precisa formular a rotina inteira, apenas dê uma luz.</div><div><br>
<br>Agradeço quem puder ajudar<br> Giovane P. Azambuja</div><div> </div><div>Enviado do Email do Windows</div><div> </div></div></div></div>
</div><br></div></div>_______________________________________________<br>R-br mailing list<br><a tabindex="-1" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br><a tabindex="-1" 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 tabindex="-1" 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><br> </div> </div> </div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a tabindex="-1" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a tabindex="-1" 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 tabindex="-1" 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.<font color="#888888"><br></font></blockquote></div>
<font color="#888888"><br><br clear="all"><div><br></div>-- <br>
Luis Iván Ortiz Valencia<br>Doutorando Saúde Pública - Epidemiologia, IESC, UFRJ<br>Estatístico Msc.<br>Spatial Analyst Msc.<br><br><br>
</font></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a tabindex="-1" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a tabindex="-1" 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 tabindex="-1" 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></div></body></html>