<div dir="ltr"><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)">Amigos de R,</div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)">Estou mais uma vez batendo cabeça com o ggplot. Eu gostaria que doi graficos ficasse lado a lado na mesma janela, mas infelizmente ainda estou pensando com o plot.default() e não estou conseguindo. Alguma luz?</div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></div><div class="gmail_default" style><div class="gmail_default" style><font color="#000066" face="courier new, monospace">d <- data.frame(ID=rep(1:10,100),outcome=c(rep(0,500),rep(1,500)),Sex=c(sample(c("F","M"),500,T,c(.8,.2)),sample(c("M","F"),500,T,c(.8,.2))),score=c(rnorm(500,5,10),rnorm(500,20,10)),grave=c("Sim","Não"))</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace"><br></font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">library("lme4")</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">fit <- glmer(outcome ~  Sex + score + (1 | ID), data = d, family = binomial,subset=grave=="Sim")</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">summary(fit)</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">fit2 <- glmer(outcome ~  Sex + score + (1 | ID), data = d, family = binomial,subset=grave=="Não")</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">summary(fit2)</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace"><br></font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">library("sjPlot")</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">sjp.glmer(fit,type='fe')</font></div><div class="gmail_default" style><font color="#000066" face="courier new, monospace">sjp.glmer(fit2,type='fe')</font></div></div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)">Que a força esteja sempre com voces!</div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></div><div><div class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div dir="ltr"><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Pedro Brasil</font></div></div></div></div></div></div>
</div>