<html><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>Caros(as)</span></div><div><span>Alguem saberia dizer como faço para mudar a cor da curva média da regressao ajustada pela nlme no CMR plot(augPred)?</span></div><div><span>Segue o código para réplica</span></div><div><span>###CMR <br></span></div><div><span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Arial; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; font-size: 16px;"><span class="Apple-style-span" style="font-family: sans-serif; font-size: 13px;"><pre>fm1 <- nlme(height ~ SSasymp(age, Asym, R0, lrc),<br> data = Loblolly,<br> fixed = Asym + R0 + lrc ~ 1,<br> random =
Asym ~ 1,<br> start = c(Asym = 103, R0 = -8.5, lrc = -3.3))<br>fm2 <- update(fm1, random = pdDiag(Asym + lrc ~ 1))<br>plot(augPred(fm2, level=0)) <br><br>Neste plot eu gostaria de mudar a cor default da curva do efeito fixo<br><br>Att,<br></pre></span></span> <span></span></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="3"><b>====================================</b></font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="3"><b>Samuel P. C. Carvalho<br></b><font color="#000000" size="2">Mestre em Ciências Florestais [UFLA]</font></font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font color="#000000" size="2">Doutorando em Recursos Florestais [ESALQ/USP]</font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="2">=============================================</font></div></div></body></html>