Adiciona os arquivos da tabela 11.1 do Zimmermann

R/ZimmermannTb11.1.R

+#' @name ZimmermannTb11.1
+#' @title Experimento fatorial com arroz
+#' @description Dados de um experimento fatorial \eqn{2^3}, com confundimento
+#'    total da interação A*B*C. Referem-se à produtividade de grãos, em kg/ha.
+#'    O ensaio foi conduzido em dois blocos ao acaso com quatro repetições. Os
+#'    fatores são: densidades de plantio de 50 e 90 sementes por metro,
+#'    espaçamentos entre linhas de 35cm e 50cm e fator presença ou ausência de 
+#'    adubação nitrogenada em cobertura. 
+#' @format Um \code{data.frame} com 32 observações e 4 variáveis
+#'
+#' \describe{
+#'
+#' \item{\code{rept}{Fator de níveis numéricos. Identifica a repetição
+#'    da observação.}
+#'    
+#' \item{\code{bloco}}{Fator de níveis numéricos. Identifica o bloco da 
+#'     repetição.}
+#'
+#' \item{\code{iden}}{Fator de níveis numéricos. É a identificação que 
+#'     representa o tratamento.}
+#'     
+#' \item{\code{prod}}{Produção de arroz, em kg/ha.}
+#'
+#' @keywords DBC faixas
+#' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
+#'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
+#'     Feijão. (pg 221)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb11.1)
+#'
+#' aggregate(prod ~ rept, data = ZimmermannTb11.1, 
+#'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
+#' 
+#' aggregate(prod ~ iden, data = ZimmermannTb11.1, 
+#'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
+#' 
+#' xyplot(prod ~ iden + rept, groups = bloco, data = ZimmermannTb11.1, 
+#'        type=c("p","a"),
+#'        xlab="Fatores", ylab="Produção de Arroz", 
+#'        main="Análise de um fatorial com confundimento")
+#'        
+#' with(ZimmermannTb11.1, interaction.plot(bloco, rept, prod, lty = c(2,3), 
+#'                                         col = 4:7, ylab = "Produção de Arroz",
+#'                                         xlab = "Bloco"))
+NULL
\ No newline at end of file

data-raw/ZimmermannTb11.1.txt

+rept	bloco	prod	iden
+1	1	2820	101
+2	1	2732	000
+3	1	2927	011
+4	1	3400	101
+1	1	3053	011
+2	1	2416	110
+3	1	2702	000
+4	1	2526	000
+1	1	2168	000
+2	1	2514	101
+3	1	2438	101
+4	1	2856	011
+1	1	1951	110
+2	1	3089	011
+3	1	2288	110
+4	1	2635	110
+1	2	2783	001
+2	2	3499	001
+3	2	2232	111
+4	2	3527	111
+1	2	3187	111
+2	2	3493	111
+3	2	1908	100
+4	2	2644	010
+1	2	1985	100
+2	2	2556	100
+3	2	2616	001
+4	2	3077	001
+1	2	3052	010
+2	2	3841	010
+3	2	2648	010
+4	2	2048	100