<font color="#000066"><font face="courier new,monospace">Amigosr de R,</font></font><div><font color="#000066"><font face="courier new,monospace"><br></font></font></div><div><font color="#000066" face="courier new, monospace">Ajustei um modelo linear com parte dos dados que tenho. Depois fiz uma previsão desse modelo com outra parte dos dados que tenho. O que gostaria de fazer é estimar o R2 e o R2 ajustado ou outra medida de ajuste geral do modelo para as previsões do segundo conjunto de dados para comparar com o ajuste do primeiro e ter uma ideia se é muito diferente. Procurei um pouco por ai mas não encontrei uma função que estimasse. Alguem tem alguma sugestão? </font></div>

<div><font color="#000066" face="courier new, monospace"><br></font></div><div><font color="#000066" face="courier new, monospace">library('rms')</font></div><div><font color="#000066" face="courier new, monospace">lmfit6 <- ols(desfecho ~ FOISini+idade+lung+intercorrencia+VM2+disphagyaSev+degen+rcs(numSessions)+degen * rcs(numSessions),w1,x=T,y=T)</font></div>

<div><font color="#000066" face="courier new, monospace"><br></font></div><div><font color="#000066" face="courier new, monospace">lmfit6</font></div><div><font color="#000066" face="courier new, monospace"><div>Linear Regression Model</div>

<div><br></div><div>ols(formula = desfecho ~ FOISini + idade + lung + intercorrencia + </div><div>    VM2 + disphagyaSev + degen + rcs(numSessions) + degen * rcs(numSessions), </div><div>    data = w1, x = T, y = T, penalty = p.bic$penalty)</div>

<div><br></div><div>                 Model Likelihood     Discrimination    </div><div>                    Ratio Test           Indexes        </div><div>Obs       372    LR chi2    403.24    R2       0.662    </div><div>

sigma  1.5341    d.f.     14.96145    R2 adj   0.648    </div><div>d.f. 356.0385    Pr(> chi2) 0.0000    g        2.279    </div><div><br></div><div>Residuals</div><div><br></div><div>Outcome </div><div>     Min       1Q   Median       3Q      Max </div>

<div>-4.06353 -1.09756  0.09737  1.09347  4.32595 </div></font></div><div><font color="#000066"><font face="courier new,monospace"><br></font></font></div><div><font color="#000066"><font face="courier new,monospace">predict(</font></font><span style="color:rgb(0,0,102);font-family:'courier new',monospace">lmfit6,w2</span><span style="font-family:'courier new',monospace;color:rgb(0,0,102)">) # previsoes do segundo conjunto de dados mas não as medidas de discriminação. </span></div>

<div><span style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></span></div><div><span style="font-family:'courier new',monospace;color:rgb(0,0,102)">Abraço forte,</span></div><div><font color="#000066"><font face="courier new,monospace"><br>

</font></font></div><div><font color="#000066"><font face="courier new,monospace"><br clear="all"></font></font><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Dr. Pedro Emmanuel A. A. do Brasil</font><div>

<font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Curriculum Lattes: 
<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span> <br>Instituto de Pesquisa Clínica Evandro Chagas<br>Fundação Oswaldo Cruz<br>

Rio de Janeiro - Brasil<br>Av. Brasil 4365, <br>CEP 21040-360,<br>Tel 55 21 3865-9648<br>email: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>email: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>

<br>---Apoio aos softwares livres<br><a href="http://www.zotero.org" target="_blank">www.zotero.org</a> - gerenciamento de referências bibliográficas. <br><a href="http://www.broffice.org" target="_blank">www.broffice.org</a> ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> - textos, planilhas ou apresentações.<br>

<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> - entrada de dados.<br><a href="http://www.r-project.org" target="_blank">www.r-project.org</a> - análise de dados.<br><a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> - sistema operacional</font></div>

<br>
</div>