<div dir="ltr">Ajuste os modelos individualmente:<div><br></div><div><div>diurno=c(68,36,40,30)</div><div>noturno=c(46,26,55,22)</div><div>quadra= c("A", "B", "G","D")</div><div>dados=data.frame(diurno,noturno,quadra)</div><div>fit1 = glm(diurno ~ factor(quadra), family = poisson, data=dados)</div><div>fit2 = glm(noturno ~ factor(quadra), family = poisson, data=dados)</div><div><br></div><div>Isto deve resolver o teu problema.</div><div><br></div><div><br></div></div></div><div class="gmail_extra"><br><div class="gmail_quote">2016-06-07 20:26 GMT-03:00 Andre Oliveira <span dir="ltr"><<a href="mailto:andreolsouza@yahoo.com.br" target="_blank">andreolsouza@yahoo.com.br</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="color:#000;background-color:#fff;font-family:bookman old style,new york,times,serif;font-size:16px"><div dir="ltr">boa noite, alguém poderia ajudar descobrir onde está o erro? <br></div><div dir="ltr"><br></div><div>remove(list=ls())</div>diurno=c(68,36,40,30)<br>noturno=c(46,26,55,22)<br>quadra= c("A", "B", "G","D")<br>dados=data.frame(diurno,noturno,quadra)<br>fit = glm(cbind(diurno, noturno) ~ factor(quadra), family = poisson, data=dados)<br><b>Error in x[good, , drop = FALSE] : <br></b><div dir="ltr"><b>  (subscript) subscrito lógico muito longo</b></div><div dir="ltr"><b><br></b></div><div dir="ltr">obrigado <b><br></b></div><div> </div><div>André Oliveira Souza. 
 Graduação em Matemática, mestrado em estatística aplicada.Instituto Federal de Educação, Ciência e Tecnologia do Espirito Santo.  IFES</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">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div></div>
</div>