<html><body><div style="color:#000; background-color:#fff; 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; color: rgb(0, 0, 0); background-color: transparent; font-style: normal;"><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;
color: rgb(0, 0, 0); background-color: transparent; font-style: normal;"><span style="background-color: transparent; font-size: 12pt;"><br></span></div><div style="font-family: 'times new roman', 'new york', times, serif; font-size: 16px; color: rgb(0, 0, 0); background-color: transparent; font-style: normal;"><span style="background-color: transparent; font-size: 12pt;"><br></span></div><div style="font-family: 'times new roman', 'new york', times, serif; font-size: 16px; color: rgb(0, 0, 0); background-color: transparent; font-style: normal;"><span style="background-color: transparent; font-size: 12pt;"><br></span></div><div style="font-family: 'times new roman', 'new york', times, serif; font-size: 16px; color: rgb(0, 0, 0); background-color: transparent; font-style: normal;"><span style="background-color: transparent; font-size: 12pt;"><br></span></div><div style="font-family: 'times new roman', 'new york', times, serif; font-size: 16px; color:
rgb(0, 0, 0); background-color: transparent; font-style: normal;"><span style="background-color: transparent; font-size: 12pt;"> </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 size="2" face="Arial"> <hr size="1"> <b><span style="font-weight:bold;">From:</span></b> Giovane Pretto Azambuja <gibuja@gmail.com><br> <b><span style="font-weight: bold;">To:</span></b> "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br> <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> <br>
<meta http-equiv="x-dns-prefetch-control" content="off"><div id="yiv1265051429"><div><div style="font-family:Calibri,;font-size:16px;">
<div style="font-family:Calibri,;font-size:16px;">
<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><meta http-equiv="x-dns-prefetch-control" content="on"><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" 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><br> </div> </div> </div></body></html>