<html><body><div style="color:#000; background-color:#fff; font-family:arial, helvetica, sans-serif;font-size:12pt"><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span>Via nls que não altera as estimativas dos parâmetros você pode fazer:</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span><br></span></div><div>mg=nls(r ~ a[t] + b[t]*x,data=d,start=list(a=c(1,1),b=c(1,1)))<br></div><div><div>ma=nls(r ~ a + b[t]*x,data=d,start=list(a=1,b=c(1,1)))</div><div>anova(mg,ma)</div><div><div>mb=nls(r ~ a[t] + b*x,data=d,start=list(a=c(1,1),b=1))</div><div>anova(mg,mb)</div><div><br></div><div>(S,f,P)</div><div>Allaman</div><div><span class="Apple-style-span" style="font-size: 16px; "> </span><br></div></div></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; background-color: transparent; " align="center"><font style="background-color:transparent;" face="comic
 sans ms" size="2"><font size="1"><b><br></b></font></font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\begin{signature}</font></font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2"><<>>=</font></font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Prof. Dr. Ivan Bezerra Allaman</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt;
 text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Universidade Estadual de Santa Cruz</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Departamento de Ciências Exatas e Tecnológicas</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Ilhéus/BA - Brasil</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif"
 size="2">Fone: +55 73 3680-5076</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font class="Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">E-mail: ivanalaman@yahoo.com.br/ivanalaman@gmail.com</font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">@</font></font></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; text-align: left; background-color: transparent; " align="center"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\end{signature}</font></font></div></div></body></html>