Prezados,
 
gostaria de saber se existe uma função que simplica a obtensão desta matriz?
 
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)
 
Att.
 
Tiago.