Caros(as)

Alguem saberia dizer como faço para mudar a cor da curva média da regressao ajustada pela nlme no CMR plot(augPred)?

Segue o código para réplica

###CMR

fm1 <- nlme(height ~ SSasymp(age, Asym, R0, lrc),
            data = Loblolly,
            fixed = Asym + R0 + lrc ~ 1,
            random =
 Asym ~ 1,
            start = c(Asym = 103, R0 = -8.5, lrc = -3.3))
fm2 <- update(fm1, random = pdDiag(Asym + lrc ~ 1))
plot(augPred(fm2, level=0)) 

Neste plot eu gostaria de mudar a cor default da curva do efeito fixo

Att,

====================================

Samuel P. C. Carvalho
Mestre em Ciências Florestais [UFLA]

Doutorando em Recursos Florestais [ESALQ/USP]

=============================================