<div dir="ltr">model.matrix(formula(~gl(4,5)))[-(1:5), ]<br><div><br></div><div style>Apesar de achar que a que tu realmente quer/precisa é model.matrix(formula(~gl(4,5)))</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">
2013/4/24 Tiago Souza Marçal <span dir="ltr"><<a href="mailto:tiagosouzamarcal@hotmail.com" target="_blank">tiagosouzamarcal@hotmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">



<div><div dir="ltr">Prezados, <br> <br>gostaria de saber se existe uma função que simplica a obtenção desta matriz?<br> <br>m<-matrix(c(rep(1,15),rep(1,5),rep(0,10),rep(0,5),rep(1,5),rep(0,5),rep(0,10),rep(1,5)),nr=15)<br>
 <br>Att.<span class="HOEnZb"><font color="#888888"><br> <br>Tiago.<br><br>                                         </font></span></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" 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>