<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'>
<br>Ok <div><br></div><div>Mesmo,assim vou dar uma olhada. obrigado pela sugestão Alisson.</div><div><br></div><div>Att.</div><div><br></div><div>Tiago.</div><div><br></div><div> <br><div><div id="SkyDrivePlaceholder"></div><hr id="stopSpelling">Date: Mon, 19 Nov 2012 18:15:39 -0800<br>From: alissonluc@yahoo.com.br<br>To: r-br@listas.c3sl.ufpr.br<br>Subject: Re: [R-br] Experimento fatorial. Desdobramento<br><br><div style="color:#000;background-color:#fff;font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>desculpa, enviei errado.</span></div><div></div><div> </div><div><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> tiago souza marçal <tiagosouzamarcal@hotmail.com><br> <b><span style="font-weight:bold">To:</span></b> r-br@listas.c3sl.ufpr.br <br> <b><span style="font-weight:bold">Sent:</span></b> Monday, November 19, 2012 9:09 PM<br> <b><span style="font-weight:bold">Subject:</span></b> Re: [R-br] Experimento fatorial. Desdobramento<br> </font> </div> <br>
<div id="ecxyiv409858492">

<style><!--
.ExternalClass #ecxyiv409858492 .ecxyiv409858492hmmessage P
{padding:0px;}
.ExternalClass #ecxyiv409858492 body.ecxyiv409858492hmmessage
{font-size:10pt;font-family:Tahoma;}

--></style>
<div><div dir="ltr">
<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span lang="EN-US" style="font-size:10.0pt;line-height:150%">Estes são os dados. Qualquer duvida eu estou a disposição.  </span></div><div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span lang="EN-US" style="font-size:10.0pt;line-height:150%">K     A     bloc  rg    ts    nvi   nv</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     37.5  1     14.55 136   22    56</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    37.5  1     21.51 159   2     62</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    37.5  1     24.62 156   0     66</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   37.5  1     21.88 171   2     68</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   37.5  1     28.11 190   0     82</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     50    1     17.16 140   20    63</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    50    1     24.44 193   6     86</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    50    1     28.5  200   6     94</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   50    1     32.94 208   7     86</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   50    1     28.76 237   10    97</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     62.5  1     14.13 132   23    58</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    62.5  1     19.71 178   10    80</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    62.5  1     31.05 231   5     99</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   62.5  1     38.35 271   0     110</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   62.5  1     36.97 262   1     106</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     37.5  2     15.72 120   22    48</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    37.5  2     19.72 146   0     64</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    37.5  2     24.29 159   1     62</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   37.5  2     25.39 152   0     60</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   37.5  2     28.45 159   0     62</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     50    2     15.44 124   12    52</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    50    2     28.12 239   9     103</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    50    2     31.49 248   4     103</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   50    2     29.95 190   1     87</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   50    2     30.06 240   4     101</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     62.5  2     15.42 140   14    64</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    62.5  2     23.68 167   7     77</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    62.5  2     33.27 237   3     96</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   62.5  2     36.63 240   1     94</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   62.5  2     41.04 248   0     105</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     37.5  3     12.77 106   4     44</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    37.5  3     20.45 157   3     63</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    37.5  3     24.35 204   1     84</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   37.5  3     27.15 169   0     66</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   37.5  3     24.08 147   1     58</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     50    3     16.01 133   22    56</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    50    3     24.57 199   7     81</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    50    3     28.85 211   3     92</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   50    3     26.23 223   7     91</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   50    3     26.36 261   5     100</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     62.5  3     16.08 128   21    50</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    62.5  3     20.99 164   9     71</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    62.5  3     30.45 216   3     94</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   62.5  3     36.83 215   2     89</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   62.5  3     34.6  228   2     89</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     37.5  4     14.26 125   11    60</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    37.5  4     23.71 185   7     75</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    37.5  4     22.76 159   1     67</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   37.5  4     22.46 176   2     76</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   37.5  4     22.97 154   1     63</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     50    4     15.54 133   27    51</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    50    4     18.48 149   4     60</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    50    4     25.54 170   1     67</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   50    4     30.29 215   2     90</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   50    4     30.64 186   4     80</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     62.5  4     17.26 147   18    62</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    62.5  4     20.51 154   10    67</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    62.5  4     24.47 179   2     75</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   62.5  4     34.52 229   0     90</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   62.5  4     37.62 216   1     87</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     37.5  5     10.3  92    5     36</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    37.5  5     16.28 133   5     57</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    37.5  5     23.61 139   2     53</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   37.5  5     29.66 166   0     69</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   37.5  5     23.34 128   1     50</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     50    5     14.41 131   26    57</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    50    5     17.24 150   1     61</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    50    5     29.08 218   4     92</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   50    5     29.52 236   1     96</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   50    5     27.98 261   4     110</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">0     62.5  5     17.56 150   17    69</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">30    62.5  5     20.05 156   13    63</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">60    62.5  5     29.9  215   3     95</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">120   62.5  5     33.21 128   0     55</span></div> 

<div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">180   62.5  5     35.5  208   2     90</span></div><div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%"><br></span></div><div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">Att.</span></div><div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%"><br></span></div><div class="ecxyiv409858492MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt;text-align:justify;line-height:150%"><span style="font-size:10.0pt;line-height:150%">Tiago.</span></div><br><div><div id="ecxyiv409858492SkyDrivePlaceholder"></div><hr id="ecxyiv409858492stopSpelling">From: sznelwar@uol.com.br<br>To: tiagosouzamarcal@hotmail.com<br>Subject: Fw: [R-br] Experimento fatorial. Desdobramento<br>Date: Mon, 19 Nov 2012 20:07:34 -0200<br><br>


<style><!--
.ExternalClass #ecxyiv409858492 .ecxyiv409858492ExternalClass .ecxyiv409858492ecxhmmessage P
{padding-bottom:0px;padding-left:0px;padding-right:0px;padding-top:0px;}
.ExternalClass #ecxyiv409858492 .ecxyiv409858492ExternalClass BODY.ecxyiv409858492ecxhmmessage
{font-family:Tahoma;font-size:10pt;}

--></style>



<div><font face="Arial"></font><font color="#0000ff" size="3" face="Arial">Poderia 
enviar este arquivo UFPR1.txt, eu não estou conseguindo entrar na página do 
LEG.</font></div>
<div><font face="Arial"></font> </div>
<div><font face="Arial"></font> </div>
<div><br></div>
<div dir="ltr">Só completando, o pacote ExpDes é a maneira mais fácil, mas 
caso você queira fazer da forma que esta fazendo é só utilizar os seguintes 
comandos:
<div><br></div>
<div><font face="Courier New">rend<-read.table("C:\\Program 
Files\\R\\RDADOS\\UFPR1.txt",h=T)</font></div>
<div><span style="font-family:'Courier New';font-size:10pt">attach(rend)</span></div>
<div>
<div><font face="Courier New">A<-factor(A)</font></div>
<div><font face="Courier New">K<-factor(K)</font></div></div>
<div><font face="Courier New">bloc<-factor(bloc)</font></div>
<div><span style="font-family:'Courier New';font-size:10pt">m1 <- 
aov(rg~bloc+A/K)</span></div>
<div><span style="line-height:115%;font-family:'Courier New';font-size:10pt" lang="EN-US">KinA<-sapply(paste("A",levels(A),sep=""),simplify=F,grep,x=names(coef(m1)[m1$assign==3]))</span></div>
<div><span style="line-height:115%;font-family:'Courier New';font-size:10pt" lang="EN-US">
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US">DesKinA<-summary(m1, split=list("A:K"=KinA))</span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US">DesKinA</span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US"><br></span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US">
</span></div><div style="line-height:normal;font-family:Tahoma"><font face="Courier New">m2 <- aov(rg~bloc+K/A)</font></div>
<div style="line-height:normal;font-family:Tahoma"><span style="line-height:14px;font-family:'Courier New';font-size:10pt" lang="EN-US">AinK<-sapply(paste("K",levels(K),sep=""),simplify=F,grep,x=names(coef(m2)[m2$assign==3]))</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="line-height:14px;font-family:'Courier New';font-size:10pt" lang="EN-US">
<div style="text-align:justify;line-height:19px;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="font-size:10pt" lang="EN-US">DesAinK<-summary(m2, 
split=list("A:K"=AinK))</span></div>
<div style="text-align:justify;line-height:19px;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="font-size:10pt" lang="EN-US">DesAinK</span></div></span></div></span>
<br>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US"><br></span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US">Outra forma seria pelo método dos efeitos aninhados</span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US"><br></span></div>
<div style="text-align:justify;line-height:150%;margin-bottom:0pt" class="ecxyiv409858492ecxMsoNormal"><span style="line-height:150%;font-size:10pt" lang="EN-US">
</span></div><div style="line-height:normal;font-family:Tahoma"><font face="Courier New">rend<-read.table("C:\\Program 
Files\\R\\RDADOS\\UFPR1.txt",h=T)</font></div>
<div style="line-height:normal;font-family:Tahoma"><span style="font-size:10pt"><font face="Courier New">attach(rend)</font></span></div>
<div style="line-height:normal;font-family:Tahoma">
<div><font face="Courier New">A<-factor(A)</font></div>
<div><font face="Courier New">K<-factor(K)</font></div>
<div><span style="font-family:'Courier New'">bloc<-factor(bloc)</span></div></div>
<div style="line-height:normal;font-family:Tahoma"><font face="Courier New">m1 <- aov(rg~bloc+A/K)</font></div>
<div style="line-height:normal;font-family:Tahoma"><font face="Courier New">effects(m1) #A partir da matriz de efeitos você seleciona os 
efeitos de interesse.</font></div>
<div style="line-height:normal;font-family:Tahoma"><span style="text-align:justify;line-height:19px;font-family:'Courier New'">DesKinA<-summary(m1, 
split=list("A:K"=list(A37.5=c(1,4,7,10),A50=c(2,5,8,11),A62.5=c(3,6,9,12))))</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="text-align:justify;line-height:19px;font-family:'Courier New'">DesKinA</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="font-family:'Courier New'">m2 <- aov(rg~bloc+K/A)</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="font-family:'Courier New'">effects(m2)</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="text-align:justify;line-height:19px;font-family:'Courier New'">DesAinK<-summary(m2, 
split=list("K:A"=list(K0=c(1,6),K30=c(2,7),K60=c(3,8),K120=c(4,9),K180=c(5,10))))</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="text-align:justify;line-height:19px;font-family:'Courier New'">DesAinK</span></div>
<div style="line-height:normal;font-family:Tahoma"><span style="text-align:justify;line-height:19px;font-family:'Courier New'"><br></span></div>
<div style="line-height:normal;font-family:Tahoma">Espero que tenhamos sanado 
sua duvida.</div>
<div style="line-height:normal;font-family:Tahoma"><br></div>
<div style="line-height:normal;font-family:Tahoma">Att.</div>
<div style="line-height:normal;font-family:Tahoma"><br></div>
<div style="line-height:normal;font-family:Tahoma">Tiago.</div>
<br></div>
<div><br>
<div>
<div id="ecxyiv409858492ecxSkyDrivePlaceholder"></div>
<hr id="ecxyiv409858492ecxstopSpelling">
Date: Sat, 17 Nov 2012 09:21:23 -0200<br>From: jhguilhen@gmail.com<br>To: 
r-br@listas.c3sl.ufpr.br; camposagro@yahoo.com.br<br>Subject: Re: [R-br] 
Experimento fatorial. Desdobramento<br><br>Uma outra maneira de fazer isto e bem 
mais fácil é utilizar o pacote ExpDes, ele já faz o desdobramento 
automaticamente quando dá interação e bem fácil de 
utilizar.<br><br>Atte..<br><br><br><br>
<div class="ecxyiv409858492ecxgmail_quote">Em 16 de novembro de 2012 21:41, Odirley Campos <span dir="ltr"><<a rel="nofollow" href="mailto:camposagro@yahoo.com.br">camposagro@yahoo.com.br</a>></span> 
escreveu:<br>
<blockquote style="border-left:#ccc 1px solid;padding-left:1ex" class="ecxyiv409858492ecxgmail_quote">
  <div>
  <div style="font-family:tahoma, 'new york', times, serif;font-size:10pt">
  <div><span>#Pessoal! Boa noite ! <br></span></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">#Estou 
  tentando sem sucesso fazer o desdobramento de interações com R. Cheguei a 
  baixar alguns arquivos da net no endereço "<span style="text-decoration:underline"><a rel="nofollow" href="http://www.leg.ufpr.br/doku.php/ridiculas#desdobramento_de_interacao_em_experimento_fatorial" target="_blank">http://www.leg.ufpr.br/doku.php/ridiculas#desdobramento_de_interacao_em_experimento_fatorial</a></span>" 
  . Porêm tive o mesmo problema que tive com meus dados. <br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">#Usei 
  os mesmos comandos retirados da net para os dados tirados de lá. A anova 
  "geral" saiu normalmente:</div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px"><br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">>rend<-read.table("C:\\Program 
  Files\\R\\RDADOS\\UFPR1.txt",h=T) #após armezenar arquivo no meu PC#</div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">>rend<br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">>m1 
  <- aov(rg~bloc+A/K, data=rend)</div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">>summary(m1) 
  #Anova geral saiu norma sem problemas#<br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">            
  Df Sum Sq Mean Sq F value  Pr(>F)    
  <br>bloc         <a rel="nofollow" target="_blank">1   51.3    51.3   
  3.585</a>  0.0624 .  
  <br>A            
  1  495.6   495.6  34.633 1.2e-07 
  ***<br>A:K          1 
  2213.7  2213.7 154.712 < 2e-16 ***<br>Residuals   71 
  1015.9    
  14.3                    
  <br>---<br>Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 
  <br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px"><br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">>summary(m1,split=list("A:K"=list("A-37.5"=c(1,4,7,10),"A-50.0"=c(2,5,8,11),"A-62.5"=c(3,6,9,12)))) 
  #<span style="background-color:rgb(255,255,0)"><span>Mas o desdobramento não 
  mostra Quadrado médio nem mesmo, F-value ou mesmo o P-value. O que eu posso 
  ter feito de errado??</span></span><br></div>
  <div style="background-color:transparent;font-style:normal;font-family:tahoma, 'new york', times, serif;font-size:13px">              
  Df Sum Sq Mean Sq F value  Pr(>F)    
  <br>bloc           
  1   51.3    51.3   3.585  0.0624 
  .  
  <br>A              
  1  495.6   495.6  34.633 1.2e-07 
  ***<br>A:K            1 
  2213.7  2213.7 154.712 < 2e-16 ***<br>  A:K: A-37.5  
  4                                   
  <br>  A:K: A-50.0  
  4                                   
  <br>  A:K: A-62.5  
  4                                   
  <br>Residuals     71 1015.9    
  14.3                    
  <br>---<br>Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 
  1 </div><span class="ecxyiv409858492ecxHOEnZb"><font color="#888888">
  <div style="text-align:center;background-color:transparent;font-style:normal;font-family:arial, helvetica, clean, sans-serif;font-size:13px">Odirley 
  Campos<br>Engenheiro Agrônomo 
UFV/MG<br></div></font></span></div></div></blockquote></div></div></div></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><br> </div> </div>  </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></body>
</html>