RamalhoEx13.2: Peso de Espigas de Cultivares Milho
In pet-estatistica/labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source Examples

Experimento que avaliou a produ<c3><a7><c3><a3>o de espigas de cultivares de milho, em delineamento de blocos casualizados. O n<c3><ba>mero de plantas por parcela foi medido <c3><a9> uma covari<c3><a1>vel para o peso final de espigas por parcela.

Um data.frame com 24 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis, em que

cult: Fator categ<c3><b3>rico de 8 n<c3><ad>veis que indica a cultivar de milho.
bloc: Fator de 3 n<c3><ad>veis que s<c3><a3>o os blocos do experimento, utilizado para fazer controle local.
plant: N<c3><ba>mero de plantas por parcela.
peso: Peso de espigas despalhadas.

RAMALHO et al. (2005), Exerc<c3><ad>cio 13.2, p<c3><a1>g. 256.

data(RamalhoEx13.2)

str(RamalhoEx13.2)

library(lattice)

cex <- with(RamalhoEx13.2, {
    x <- plant - min(plant)
    x <- x/max(x)
    0.5 + 1.3 * x
})

xyplot(peso ~ cult, groups = bloc, data = RamalhoEx13.2,
       type = "o", cex = cex,
       ylab = "Peso de espigas despalhadas",
       xlab = "Cultivares de milho")

xyplot(peso ~ plant, groups = bloc, data = RamalhoEx13.2,
       auto.key = list(columns = 3, title = "Cultivar",
                       cex.title = 1.1),
       xlab = "Peso de espigas",
       ylab = "Plantas por parcela")