<div dir="ltr">Bom dia Elias.<div>Consegui extrair os valores pra depois consultar a distribuição F.</div><div>Veja abaixo.</div><div><br></div><div><div>imp <- mice(nhanes2)</div><div>fit <- with(imp, lm(chl~age+bmi))</div><div>summary(fit)</div><div><br></div><div>tam1 <- length(fit)</div><div>tam2 <- length(fit[[4]])</div><div>s <- summary(fit[[tam1]][[tam2]])</div><div>p.value <- 1 - pf(q = s$fstatistic["value"], df1 = s$fstatistic["numdf"], df2 = s$fstatistic["dendf"])</div><div>p.value</div></div><div class="gmail_extra"><br></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature" data-smartmail="gmail_signature"><div dir="ltr"><div><div>Abraços,<br></div><div>Paulo<br></div></div></div></div></div>
<br><div class="gmail_quote">2017-04-20 20:30 GMT-03:00 Elias Carvalho 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 style="font-family:"times new roman",serif;font-size:small">Boa noite pessoal</div><div style="font-family:"times new roman",serif;font-size:small"><br></div><div style="font-family:"times new roman",serif;font-size:small">Estou testando o pacote mice para fazer imputação múltipla de dados missing, conforme exemplo:</div><div style="font-family:"times new roman",serif;font-size:small"><br></div><div style="font-family:"times new roman",serif;font-size:small">library(mice)</div><div style="font-family:"times new roman",serif;font-size:small"><br></div><div style="font-family:"times new roman",serif;font-size:small"><div>imp <- mice(nhanes2)</div><div>fit <- with(imp, lm(chl~age+bmi))</div><div><br></div><div>summary(fit)</div><div><br></div></div><div style="font-family:"times new roman",serif;font-size:small"><div>O resultado se resume em: </div><div><br></div><div><pre class="m_-8577896303302000261gmail-GGHFMYIBMOB" id="m_-8577896303302000261gmail-rstudio_console_output" style="font-family:"ubuntu mono";outline:none;border:none;word-break:break-all;margin-top:0px;margin-bottom:0px;line-height:13.3333px;color:rgb(255,255,255);background-color:rgb(0,34,64);font-size:10.4pt;white-space:pre-wrap"> ## summary of imputation 1 :
Call:
lm(formula = chl ~ age + bmi)
Residuals:
Min 1Q Median 3Q Max
-46.37 -19.23 -11.24 12.66 83.69
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 32.134 53.202 0.604 0.55232
age2 49.058 18.153 2.702 0.01334 *
age3 62.837 19.886 3.160 0.00472 **
bmi 4.907 1.795 2.733 0.01246 *
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
Residual standard error: 34.89 on 21 degrees of freedom
Multiple R-squared: 0.3835, Adjusted R-squared: 0.2954
F-statistic: 4.354 on 3 and 21 DF, p-value: 0.01557</pre></div></div><div><br></div><div><div style="font-family:"times new roman",serif;font-size:small">Eu gostaria de extrair o p-value: 0.01557 dessa estrutura, mas não consegui com os métodos convencionais, pois a estrutura parece diferente da estrutura gerada por um lm ou glm.</div><div style="font-family:"times new roman",serif;font-size:small"><br></div><div style="font-family:"times new roman",serif;font-size:small">Alguém poderia me ajudar</div><span class="HOEnZb"><font color="#888888"><br></font></span></div><span class="HOEnZb"><font color="#888888">-- <br><div class="m_-8577896303302000261gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><div><font face="times new roman, serif"><i><span style="font-size:12.8px">In Jesu et Maria</span><br><br style="font-size:small"></i></font><div><div dir="ltr"><div dir="ltr"><div dir="ltr"><div style="font-size:small"><font face="times new roman, serif"><i>Obrigado</i></font></div><div style="font-size:small"><font face="times new roman, serif"><i>Prof. Elias Carvalho</i></font></div><div style="font-size:small"><font face="times new roman, serif"><i><br></i></font></div><div><font face="times new roman, serif" size="2"><i><div>"Felix, qui potuit rerum cognoscere causas" (Virgil 29 BC)</div><div>"Blessed is he who has been able to understand the cause of things"</div></i></font></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>
</font></span></div>
<br>______________________________<wbr>_________________<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/<wbr>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-<wbr>guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div>