
Pessoal, gostaria da ajuda de vocês para criar uma matrix do modelo, como exemplo abaixo: LOCAL <- rep(c('local1','local2'),each=4) Rep <- 1:8 CLONE <- rep(1:2,4) BLOCO <- rep(1:4,each=2) dados <- data.frame(LOCAL,BLOCO,CLONE,Rep) dados$Int <- paste(dados$LOCAL,dados$CLONE,sep='') dados$Obs <- 1 dados$TCH <- sort(rnorm(nrow(dados),10,1)) dados$IND <- as.factor(dados$IND) dados$CLONE <- as.factor(dados$CLONE) dados$BLOCO <- as.factor(dados$BLOCO) summary(dados) op <- options(contrasts=c("contr.treatment", "contr.poly")) MM <- model.matrix(~BLOCO+CLONE+LOCAL:CLONE,dados) MM (Intercept) BLOCO2 BLOCO3 BLOCO4 CLONE2 CLONE1:LOCALlocal2 CLONE2:LOCALlocal2 1 1 0 0 0 0 0 0 2 1 0 0 0 1 0 0 3 1 1 0 0 0 0 0 4 1 1 0 0 1 0 0 5 1 0 1 0 0 1 0 6 1 0 1 0 1 0 1 7 1 0 0 1 0 1 0 8 1 0 0 1 1 0 1 esta foi a matrix criado pelo model.matrix, porem gostaria de uma matrix diferente, pois nesta criada pela model.matrix o bloco1 não aparece pois é estimado por direfença, assim como o clone1, eu quero que todos os niveis aparecem tendo como nome das colunas: (Intercept) BLOCO1 BLOCO2 BLOCO3 BLOCO4 CLONE1 CLONE2 CLONE1:LOCAL1 CLONE1:LOCAL2 CLONE2:LOCAL1 CLONE2:LOCAL2 Alguem tem uma dica? Att