<div dir="ltr"><div class="gmail_default" style=""><div class="gmail_default" style="font-family:monospace,monospace">Pessoal, </div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">Preciso de uma ajuda na execução desse script abaixo:</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>#Data.Frame</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i><br></i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><div class="gmail_default"><b><i>> data.frame(A)</i></b></div><div class="gmail_default"><b><i>   M     R</i></b></div><div class="gmail_default"><b><i>1  1 0.150</i></b></div><div class="gmail_default"><b><i>2  1 0.117</i></b></div><div class="gmail_default"><b><i>3  1 0.125</i></b></div><div class="gmail_default"><b><i>4  2 0.312</i></b></div><div class="gmail_default"><b><i>5  2 0.288</i></b></div><div class="gmail_default"><b><i>6  2 0.262</i></b></div><div class="gmail_default"><b><i>7  3 0.318</i></b></div><div class="gmail_default"><b><i>8  3 0.315</i></b></div><div class="gmail_default"><b><i>9  3 0.299</i></b></div><div class="gmail_default"><b><i>10 4 0.395</i></b></div><div class="gmail_default"><b><i>11 4 0.312</i></b></div><div class="gmail_default"><b><i>12 4 0.365</i></b></div></div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>#ANOVA One Way</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>av<-aov(R ~ M, data.frame(A))</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>summary(av)</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i><br></i></b></div><div class="gmail_default" style=""><div class="gmail_default" style=""><font face="monospace, monospace"><b><i>#Teste de Scott Knott</i></b></font></div><div class="gmail_default" style=""><font face="monospace, monospace"><b><i>sk <- SK(x=av, y=A$R,  model='y~x', which='x', dispersion='se')</i></b></font></div><div class="gmail_default" style=""><font face="monospace, monospace"><b><i><br></i></b></font></div><div class="gmail_default" style=""><font face="monospace, monospace"><b><i>summary(sk)</i></b></font></div><div class="gmail_default" style=""><font face="monospace, monospace"><br></font></div><div class="gmail_default" style=""><font face="monospace, monospace">Quando vou executar a rotina, aparece esta mensagem:</font></div><div class="gmail_default" style=""><font face="monospace, monospace"><br></font></div><div class="gmail_default" style=""><font face="monospace, monospace"><div class="gmail_default"><b><i>> sk <- SK(x=av, y=A$R,  model='y~x', which='x', dispersion='se')</i></b></div><div class="gmail_default"><b><i>Error in SK.aov(x = av, y = A$R, model = "y~x", which = "x", dispersion = "se") : </i></b></div><div class="gmail_default"><b><i>  No factors in the fitted model!</i></b></div><div class="gmail_default"><b><i>In addition: Warning message:</i></b></div><div class="gmail_default"><b><i>In replications(paste("~", xx), data = mf) : non-factors ignored: M</i></b></div><div class="gmail_default"><br></div><div class="gmail_default"><br></div></font></div><div class="gmail_default" style=""><font face="monospace, monospace">Como poderia resolver isto?</font></div><div class="gmail_default" style=""><font face="monospace, monospace"><br></font></div><div class="gmail_default" style=""><font face="monospace, monospace">Obrigado</font></div><div class="gmail_default" style=""><font face="monospace, monospace"><br></font></div></div></div><div><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div><b>----</b></div><b><div><b><br></b></div><font face="monospace, monospace">Pedro Henrique Campelo Felix</font></b><div><i><font face="monospace, monospace">Bachelor of Food Engineering (UNI-BH)</font></i></div><div><i><font face="monospace, monospace">Msc. Chemical Engineering (UFMG)</font></i></div><div><i><font face="monospace, monospace">PhD Student of Food Science (UFLA)</font></i></div><div><font face="monospace, monospace"><br></font></div><div><b><font face="monospace, monospace">+55 (31) 97560-1545 (TIM)</font></b><font size="1"><i><font face="monospace, monospace"><br></font></i><font size="2"><i><font face="monospace, monospace">"</font></i><span style="color:rgb(0,0,0);font-variant:normal;font-weight:normal;letter-spacing:normal;line-height:normal;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;float:none;display:inline!important;background-color:rgb(255,255,255)"><i><font face="monospace, monospace">Nós somos aquilo que fazemos repetidamente. Excelência, então, não é um modo de agir, mas um hábito." Aristóteles</font></i><br></span></font></font></div></div></div></div></div></div></div></div></div></div></div></div>
</div>