<div dir="ltr"><div>Uma alternativa para obter as informações do ajuste do modelo em um data frame.</div><div><br></div><div>model<-nls(R~k*M^n, start=list(k=0.5,n=1), <b>data = df</b>)<br></div><div><div>stats <- tidy(model)</div><div>#  term estimate  std.error statistic      p.value</div><div>#1    k 11.53004 0.58948562  19.55949 1.808707e-10</div><div>#2    n  0.31174 0.01158954  26.89839 4.284298e-12</div></div><div>class(stats)</div><div>"data.frame"<br></div><div><div>stats[, 1:2]</div><div>#  term estimate</div><div>#1    k 11.53004</div><div>#2    n  0.31174</div></div><div><br></div></div><div class="gmail_extra"><br><div class="gmail_quote">2016-07-05 15:21 GMT-03:00 Pedro Campelo via R-br <span dir="ltr"><<a href="mailto:r-br@listas.c3sl.ufpr.br" target="_blank">r-br@listas.c3sl.ufpr.br</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><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">Estou rodando um script e preciso extrair os dados dos coeficientes ajustados para um modelo. No meu exemplo, quero extrair e separar os valores "k" e "n".</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default"><div class="gmail_default" style="font-family:monospace,monospace"><b><i>> data.frame(A)</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>     M     R</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>1   10 24.61</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>2   20 29.41</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>3   30 33.07</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>4   40 37.37</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>5   50 38.22</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>6   60 41.14</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>7   70 41.61</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>8   80 43.41</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>9   90 47.18</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>10 100 48.77</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>11 110 51.02</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>12 120 52.95</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>13 130 52.98</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i>14 140 52.92</i></b></div><div class="gmail_default" style="font-family:monospace,monospace"><b><i><br></i></b></div><div class="gmail_default"><div class="gmail_default"><font face="monospace, monospace"><b><i>> model<-nls(R~k*M^n, start=list(k=0.5,n=1))</i></b></font></div><div class="gmail_default"><font face="monospace, monospace"><b><i>> summary(model)</i></b></font></div><div class="gmail_default"><br></div><div class="gmail_default"><br></div><div class="gmail_default">Obrigado</div><div class="gmail_default"><font face="monospace, monospace"><br></font></div><div class="gmail_default"><font face="monospace, monospace"><br></font></div></div></div><div><div 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"><a href="tel:%2B55%20%2831%29%2097560-1545" value="+5531975601545" target="_blank">+55 (31) 97560-1545</a> (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>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><font size="2" style="font-family:arial">###############################################################</font><br><span style="font-family:arial;font-size:small">##  </span><span style="font-size:11px;text-align:center;background-color:rgb(239,239,239);color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;line-height:13px">Jônatan Dupont Tatsch</span></div><div><span style="font-family:arial;font-size:small">##  </span><span style="color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;font-size:10.909090995788574px;line-height:12.997159004211426px;text-align:center;background-color:rgb(239,239,239)">Professor do Departamento de Física</span></div><div><span style="font-size:small;font-family:arial">##  </span><span style="color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;font-size:10.909090995788574px;line-height:12.997159004211426px;text-align:center;background-color:rgb(239,239,239)">Centro de Ciências Exatas e Naturais (CCNE)</span><br></div><div><span style="font-size:small;font-family:arial">##  </span><span style="color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;font-size:10.909090995788574px;line-height:12.997159004211426px;text-align:center;background-color:rgb(239,239,239)">Universidade Federal de Santa Maria - UFSM</span></div><div><span style="font-family:arial;font-size:small">##  </span><span style="font-size:11px;text-align:center;background-color:rgb(239,239,239);color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;line-height:13px">Faixa de Camobi, Prédio 13 - Campus UFSM - </span><span style="font-size:11px;text-align:center;background-color:rgb(239,239,239);color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;line-height:13px">Santa Maria, RS, Brasil - 97105-900</span><br></div><div style="font-family:arial;font-size:small">##  <span style="font-size:11px;text-align:center;background-color:rgb(239,239,239);color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;line-height:13px">Telefone: +55(55)33012083</span><br></div><div style="font-family:arial;font-size:small">##  <span style="font-size:11px;text-align:center;background-color:rgb(239,239,239);color:rgb(150,150,150);font-family:Verdana,Arial,Helvetica,sans-serif;line-height:13px"><a href="http://www.ufsm.br/meteorologia" target="_blank">www.ufsm.br/meteorologia</a></span></div><div style="font-family:arial;font-size:small">###############################################################</div></div></div></div></div></div></div>
</div>