<html>
<head>
<style><!--
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
font-size: 10pt;
font-family:Tahoma
}
--></style></head>
<body class='hmmessage'><div dir='ltr'>
André de uma olhada se as aplicações dos comandos <font face="Courier New">tapply()</font> e <font face="Courier New">lapply()</font> que estou lhe enviando e o que você esta procurando.<div><br></div><div>Assim que possível vou <span style="font-size: 10pt; ">te enviar um exemplo onde você conseguirá desdobrar </span><span style="font-size: 10pt; ">interações da anova de um experimento fatorial ou aplicar um teste </span></div><div><span style="font-size: 10pt; "><br></span></div><div><span style="font-size: 10pt; ">de media para o desdobramento de uma interação. </span></div><div><br></div><div><div><font face="Courier New">tratamentos<-c(rep("A",5),rep("B",5),rep("C",5),rep("D",5),rep("E",5)) #Criando um vetor para os tratamentos</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">tratamentos<-factor(tratamentos)</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">resposta1<-c(rnorm(5,46,3),rnorm(5,39,3),rnorm(5,33,3),rnorm(5,26,3),rnorm(5,17,3)) #Criando um vetor para a primeira caracteristica</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">resposta2<-c(rnorm(5,33,3),rnorm(5,22,3),rnorm(5,17,3),rnorm(5,13,3),rnorm(5,5,3)) #Criando um vetor para a segunda caracteristica</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">dados<-data.frame(tratamentos,resposta1,resposta2) #Criando o arquivo de dados</font></div><div><br></div><div><br></div><div><font face="Courier New"># Função tapply()</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">tapply(resposta1,tratamentos,mean) #Calculo da media da resposta1 para cada tratamento</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">tapply(resposta1,tratamentos,sd) #Calculo do desvio padrao da resposta1 para cada tratamento </font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">tapply(resposta1,tratamentos,median) #Calculo da mediana da resposta1 para cada tratamento</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">#Utilizando o comando tapply() voce pode aplicar qualquer função sobre os seus tratamentos</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New"># Função lapply()</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">anova<-lapply(2:3,function(i){aov(dados[,i]~tratamentos)}) #Calculando a anova para as duas respostas</font></div><div><font face="Courier New"><br></font></div><div><font face="Courier New">lapply(anova,summary)</font></div><div><br></div><div>Att.</div><div><br></div><div>Tiago<span style="font-size: 10pt; "> </span></div><div><div><br><div><div id="SkyDrivePlaceholder"></div><hr id="stopSpelling">Date: Mon, 15 Oct 2012 20:19:35 -0300<br>From: andrebvs@bol.com.br<br>To: r-br@listas.c3sl.ufpr.br<br>Subject: [R-br] Família APPLY...<br><br><div>Olá colegas!</div>
<div> </div>
<div>Percebo que a familia APPLY é bastante utilizada pelos Rsistas (usuários do R), inclusive, as vezes também chego a utilizar.</div>
<div>Porém, gostaria de saber melhor em quais situações devo usar tais funções abaixo? Qual a idéia de usar tais funções?</div>
<div>Alguém aqui, poderia nos dar exemplos curtos para se ter uma noção do uso de cada uma dessas funções?</div>
<div> </div>
<div>Funções: <strong>sapply() lapply() apply() mapply() tapply() rapply() dapply()</strong></div>
<div><strong> </strong></div>
<div>desde já agradeço!</div>
<div> </div>
<div><em>Att.</em></div>
<div><em>André</em><strong><br></strong></div>
<br>_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.</div></div></div></div> </div></body>
</html>