labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source Examples

Ensaio 1 de um experimento em DQL, que avaliou a resist<c3><aa>ncia a insetos em seis cultivares de arroz, sendo uma delas comum ao ensaio 2. Os dados s<c3><a3>o de produtividade de espiguetas, em gramas.

Um data.frame com 36 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis

linha: Fator de n<c3><ad>veis num<c3><a9>ricos. Indica em que linha do quadrado a unidade experimental est<c3><a1>.
coluna: Fator de n<c3><ad>veis num<c3><a9>ricos. Indica em que coluna do quadrado a unidade experimental est<c3><a1>.
cult: Indica a cultivar.
prod: Produ<c3><a7><c3><a3>o de espiguetas, em gramas.

ZIMMERMANN (2004), p<c3><a1>g. 261.

library(lattice)
library(reshape)

data(ZimmermannTb12.26)
str(ZimmermannTb12.26)

cast(ZimmermannTb12.26, linha ~ coluna, value = "cult")
cast(ZimmermannTb12.26, linha ~ coluna, value = "prod")

levelplot(prod ~ linha + coluna,
          data = ZimmermannTb12.26, aspect = "iso",
          panel = function(x, y, z, subscripts, ...) {
              panel.levelplot(x, y, z, subscripts = subscripts, ...)
              panel.text(x, y, ZimmermannTb12.26$cult[subscripts],
                         cex = 0.8)
              panel.text(x, y, z, pos = 1)
          })

xyplot(prod ~ cult, data = ZimmermannTb12.26, type = c("p", "a"),
       xlab = "Cultivares",
       ylab = expression("Produtividade de espiguetas"~(g)))