<html><body><div style="color:#000; background-color:#fff; font-family:arial, helvetica, sans-serif;font-size:12pt"><div id="yiv1329469388"><div><div style="color: rgb(0, 0, 0); background-color: rgb(255, 255, 255); font-size: 12pt; font-family: arial, helvetica, sans-serif; "><div id="yiv1329469388yui_3_2_0_15_132239531125548" style="font-size: 12pt; font-family: arial, helvetica, sans-serif; "><span class="Apple-style-span" style="font-size: medium; "><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span>Gilson,</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span><br></span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt; "><span>Busque por modelos que podem lhe dar respostas mais interessantes. Veja,</span></div><div style="font-family: arial, helvetica, sans-serif; font-size: 12pt;
"><span><br></span></div><div><span><div>A.Det=c(-0.595750,0.050250,0.270000,0.711500,1.608750,3.353500,4.937652,4.573750,4.955000) </div><div>luz=c(0,25,50,75,100,500,1000,1500,2000)</div><div><br></div><div>ajuste <- nls((A.Det~(a + 0.595750) * (1 - exp (-b * luz/(a-0.595750)))+0.595750),</div><div> start=list(a=500, b=5))</div><div><br></div><div><div>plot(luz,A.Det)</div><div>curve(3.9669 + 0.595750 * (1 - exp (-0.0061 * x/(3.9669-0.595750)))+0.595750,add=TRUE,col='blue')</div><div>curve(SSasympOff(x,4.8292,-5.7353,23.452),add=TRUE,col='red')</div><div>legend('bottomright', xjust=1,bty="n",</div><div> c('Alternativo','Gilson'),</div> lwd=2,col=c('red','blue')) </div><div><br></div><div>Sobre este modelo 'alternativo', consulte "Mixed Effects Models in S and S-Plus, Pinheiro & Bates (2000)"</div><div><br></div><div>OBS: Estes modelos não tem ponto de inflexão,
pois quanto x tende ao infinito, y tende a zero, veja:</div><div><br></div><div><div>D(expression(theta1*(1-exp(-exp(theta2)*(x-theta3)))),'x')</div><div><br></div><div>curve(4.8292 * (exp(-exp(-5.7353) * (x - 23.452)) * exp(-5.7353)),to=0,from=2000,ylab='y') </div></div><div><br></div><div><br></div><div>(S,f,P)</div><div>Allaman</div></span></div></span></div><div id="yiv1329469388yui_3_2_0_15_132239531125554" style="font-size: 12pt; font-family: arial, helvetica, sans-serif; "> </div><div style="font-size: 12pt; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125557"><font style="background-color:transparent;" face="comic sans ms" size="2"><font size="1"><b><br></b></font></font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center"
id="yiv1329469388yui_3_2_0_15_132239531125560"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\begin{signature}</font></font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125563"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2"><<>>=</font></font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125566"><font class="yiv1329469388Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Prof. Dr. Ivan Bezerra Allaman</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; "
align="center" id="yiv1329469388yui_3_2_0_15_132239531125569"><font class="yiv1329469388Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Universidade Estadual de Santa Cruz</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125572"><font class="yiv1329469388Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Departamento de Ciências Exatas e Tecnológicas</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125575"><font class="yiv1329469388Apple-style-span" face="courier,
monaco, monospace, sans-serif" size="2">Ilhéus/BA - Brasil</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125578"><font class="yiv1329469388Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">Fone: +55 73 3680-5076</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125581"><font class="yiv1329469388Apple-style-span" face="courier, monaco, monospace, sans-serif" size="2">E-mail: ivanalaman@yahoo.com.br/ivanalaman@gmail.com</font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125584"><font
style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">@</font></font></div><div style="font-size: 12pt; text-align: left; background-color: transparent; font-family: arial, helvetica, sans-serif; " align="center" id="yiv1329469388yui_3_2_0_15_132239531125587"><font style="background-color:transparent;"><font face="courier, monaco, monospace, sans-serif" size="2">\end{signature}</font></font></div></div></div></div></div></body></html>