<div dir="ltr"><div><div><div><div><div>Geovane,<br><br></div>Para realizar uma analise de dados, o estatistico precisa entender a (hi/e)storia dos dados. Por exemplo, sem saber do que se tratam os dados, e' dificil acreditar que a regressao linear simples que voce apresenta no seu exemplo seja adequada. A outra coisa: como/onde entra o fator "Quintis" existente no seu conjunto de dados?<br>
<br></div>Enfim, supondo adequacidade em todos os sentidos (cabera' a vc verificar os pressupostos), se o interesse e' averiguar a identidade das regressoes nos tres grupos escolares (vou ignorar Quintis aqui, pois realmente nao sei o que e', nem como entra na sua analise), eu ajustaria os modelos com interacao (vis-a-vis Escolaridade) e compararia com o modelo simplificado (que contem apenas Idade):<br>
<br></div>fit1 = lm(Risco ~ Idade*Escolaridade3cat, data=dados)<br></div>fit0 = lm(Risco ~ Idade, data=dados)<br></div>anova(fit0, fit1)<br><div><div><div class="gmail_extra"><br><br></div><div class="gmail_extra">benilton<br>
</div><div class="gmail_extra"><br><div class="gmail_quote">Em 6 de março de 2014 10:43, geovane barbosa <span dir="ltr"><<a href="mailto:geovanecb@yahoo.com.br" target="_blank">geovanecb@yahoo.com.br</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="font-size:10pt;font-family:HelveticaNeue,Helvetica Neue,Helvetica,Arial,Lucida Grande,sans-serif"><div>
<span><br></span></div><div></div><div><br></div><div><div>Olá pessoal , segue em anexo um exemplo reprodutível. Quero verificar se os interceptos proporcionados pelas retas de regressão bem como a inclinação são estatisticamente diferente e significativas, como faço isso?</div>
<div><br clear="none"></div><div><br clear="none"></div><div>segue abaixo os codigos e banco num link. O teste do paralelismo consiste em verificar se as inclinações são estatisticamente significantes? </div><div>
<div><br clear="none"></div><div><div><br clear="none"></div><div><br clear="none"></div><div>dados<-read.csv("bancoteste.csv",sep=";",dec=",",header=T)</div><div><br clear="none"></div><div>
dados$Escolaridade3cat<-factor(dados$Escolaridade3cat,label=c("Fundamental","Médio","Superior/Pós
graduação"),levels=1:3) </div><div><br clear="none"></div><div><br clear="none"></div><div>dados$Quintis<-factor(dados$Quintis)</div><div><br clear="none"></div><div><br clear="none"></div><div><br clear="none">
</div><div>c <- ggplot(dados, aes(y=Risco, x=Idade, linetype=Quintis))</div><div><br clear="none"></div><div>p8 <-c + stat_smooth(method=lm, se=FALSE,color="black",size=1.5)+ xlab("Idade")+ylab("Risco")+scale_colour_hue(name="")+theme_bw()+facet_grid(.~ Escolaridade3cat,space="free",scales="free_x")</div>
<div><br clear="none"></div></div></div></div><div><br></div><div><br></div><div><br></div><div><br></div><div><a href="https://www.dropbox.com/s/ymyzh7p0xhmumda/bancoteste.csv" target="_blank">https://www.dropbox.com/s/ymyzh7p0xhmumda/bancoteste.csv</a><br>
</div><div style="display:block"> <br> <br> <div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:10pt"> <div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:12pt">
<div dir="ltr"> <font face="Arial"> Em Quinta-feira, 6 de Março de 2014 10:12, geovane barbosa <<a href="mailto:geovanecb@yahoo.com.br" target="_blank">geovanecb@yahoo.com.br</a>> escreveu:<br> </font> </div><div>
<div>
<div><div><div><div style="font-size:10pt;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><div><span><br clear="none"></span></div><div></div><div> </div><div>Olá Prof, segue em anexo um exemplo reprodutível. Como eu lhe disse anteriormente, queria verificar se os interceptos proporcionados pelas retas de regressão bem como a inclinação são estatisticamente diferente e significativas, como faço isso?</div>
<div><br clear="none"></div><div><br clear="none"></div><div>segue abaixo os codigos e o banco de dados ficticio. O teste do paralelismo consiste em verificar se as inclinações
são estatisticamente significantes? </div><div><br clear="none"></div><div><div><br clear="none"></div><div><br clear="none"></div><div>dados<-read.csv("bancoteste.csv",sep=";",dec=",",header=T)</div>
<div><br clear="none"></div><div>dados$Escolaridade3cat<-factor(dados$Escolaridade3cat,label=c("Fundamental","Médio","Superior/Pós
graduação"),levels=1:3) </div><div><br clear="none"></div><div><br clear="none"></div><div>dados$Quintis<-factor(dados$Quintis)</div><div><br clear="none"></div><div><br clear="none"></div><div><br clear="none">
</div><div>c <- ggplot(dados, aes(y=Risco, x=Idade, linetype=Quintis))</div><div><br clear="none"></div><div>p8 <-c + stat_smooth(method=lm, se=FALSE,color="black",size=1.5)+ xlab("Idade")+ylab("Risco")+scale_colour_hue(name="")+theme_bw()+facet_grid(.~ Escolaridade3cat,space="free",scales="free_x")</div>
<div><br clear="none"></div></div><div><br clear="none"></div><div style="display:block"> <br clear="none"> <br clear="none"> <div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:10pt">
<div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:12pt"> <div dir="ltr"> <font face="Arial"> Em Quarta-feira, 5 de Março de 2014 16:54, Benilton Carvalho <<a href="mailto:beniltoncarvalho@gmail.com" target="_blank">beniltoncarvalho@gmail.com</a>> escreveu:<br clear="none">
</font>
</div> <div><div><div><div><div dir="ltr">A gente pede que exemplos reprodutíveis sejam dados para que possamos dar uma resposta definitiva sem a necessidade de idas e vindas. </div>
<div dir="ltr">Como eu não entendi quais são os três cenários, fica a tarefa p vc: o caso a que vc se refere consiste em testar se as interações das variáveis de interesse com os referidos grupos são conjuntamente iguais a zero. </div>
<div dir="ltr">b</div>
<div>On Mar 5, 2014 11:00 AM, "geovane barbosa" <<a rel="nofollow" shape="rect" href="mailto:geovanecb@yahoo.com.br" target="_blank">geovanecb@yahoo.com.br</a>> wrote:<br clear="none"><blockquote style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div><div><div style="font-size:10pt;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><div><span><br clear="none"></span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif">
<span>Olá pessoal bom dia.</span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none">
</span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none"></span></div>
<div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif">
<span>Estou com uma questão que não consigo soluciona-la.</span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif">
<span><br clear="none"></span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none">
</span></div>
<div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span>Realize um regressão linear múltipla para comprar um grau de risco por idade e por escolaridade.</span></div>
<div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none"></span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif">
<span>Quero verificar se a inclinação proporcionada por essas retas é estatisticamente significativa, ou seja comparando a inclinação nos três cenários. bem como tambem seu intercepto. Como eu faço isso? Seria o test de Brant? Não consigo encontrar tal ferramenta no r.</span></div>
<div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none"></span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif">
<span>abraços</span></div><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none">
</span></div>
<div style="font-style:normal;font-size:13px;background-color:transparent;font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif"><span><br clear="none"></span></div><div></div>
<div> </div>
</div></div></div><br clear="none">_______________________________________________<br clear="none">
R-br mailing list<br clear="none">
<a rel="nofollow" shape="rect" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br clear="none">
<a rel="nofollow" shape="rect" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">
Leia o guia de postagem (<a rel="nofollow" shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br clear="none"></blockquote></div>
</div></div></div><br clear="none"><div>_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a rel="nofollow" shape="rect" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br clear="none">
<a rel="nofollow" shape="rect" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">Leia o guia de postagem (<a rel="nofollow" shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo
reproduzível.</div><br clear="none"><br clear="none"></div> </div> </div> </div> </div></div></div><br><br></div> </div></div></div> </div> </div> </div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" 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" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div></div></div>