Explorando os dados

Vamos agora explorar um pouco os dados.

names(lat01)
summary(lat01)

attach(lat01)

plot(resp ~ coluna + linha + trat)

lat01.mt <- tapply(resp, trat, mean)
lat01.mt
lat01.ml <- tapply(resp, linha, mean)
lat01.ml
lat01.mc <- tapply(resp, coluna, mean)
lat01.mc

plot.default(trat, resp)
points(lat01.mt, pch="x", col=2, cex=1.5)

Nos gráficos e resultados acima procuramos captar os principais aspectos dos dados bem como verificar se não há interação entre linhas, colunas e tratamentos, o que não deve acontecer neste tipo de experimento.
A seguir vamos ajustar o modelo e obter outros resultados, incluindo a análise de resíduos e testes para verificar a validades dos pressupostos do modelo.