diff --git a/R/ZimmermannTb12.32.R b/R/ZimmermannTb12.32.R
new file mode 100644
index 0000000000000000000000000000000000000000..2e4eac9ecf8ee85b7f7472b993faf687ac159afc
--- /dev/null
+++ b/R/ZimmermannTb12.32.R
@@ -0,0 +1,40 @@
+#' @name ZimmermannTb12.32
+#' @title Competição de Cultivares de Feijão
+#' @description Dados de um estudo em delineamento de blocos completos com 
+#'     quatro repetições. O experimento foi um ensaio de competição de
+#'     cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
+#'     São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro
+#'     e geral. 
+#' @format Um \code{data.frame} com 13 observações e 4 variáveis
+#'
+#' \describe{
+#'
+#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
+#'     da observação.}
+#'
+#' \item{\code{irrigados}}{Médias nos ensaios irrigados.}
+#' 
+#' \item{\code{sequeiro}}{Médias nos ensaios de sequeiro.}
+#'
+#' \item{\code{geral}}{Média geral.}
+#'
+#' }
+#' @keywords DBC
+#' @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. (Tabela 12.32, pág 264)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb12.32)
+#'
+#' str(ZimmermannTb12.32)
+#'
+#' xyplot(geral ~ geno, data = ZimmermannTb12.32,
+#'        type = "o", jitter.x = TRUE,
+#'        xlab = "Genótipo",
+#'        ylab = "Média Geral",
+#'        main = "Competição de Cultivares de Feijão",
+#'        scales = list(x = list(rot = 90)))
+NULL
diff --git a/R/ZimmermannTb12.33.R b/R/ZimmermannTb12.33.R
new file mode 100644
index 0000000000000000000000000000000000000000..ce4256f1d280946e952ba5276414131449ccc74f
--- /dev/null
+++ b/R/ZimmermannTb12.33.R
@@ -0,0 +1,40 @@
+#' @name ZimmermannTb12.33
+#' @title Competição de Cultivares de Feijão
+#' @description Dados de um estudo em delineamento de blocos completos com 
+#'     quatro repetições. O experimento foi um ensaio de competição de
+#'     cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
+#'     São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro
+#'     e geral. 
+#' @format Um \code{data.frame} com 13 observações e 4 variáveis
+#'
+#' \describe{
+#'
+#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
+#'     da observação.}
+#'
+#' \item{\code{irrigados}}{Totais nos ensaios irrigados.}
+#' 
+#' \item{\code{sequeiro}}{Totais nos ensaios de sequeiro.}
+#'
+#' \item{\code{geral}}{Total geral.}
+#'
+#' }
+#' @keywords DBC
+#' @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. (Tabela 12.33, pág 265)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb12.33)
+#'
+#' str(ZimmermannTb12.33)
+#'
+#' xyplot(geral ~ geno, data = ZimmermannTb12.33,
+#'        type = "o", jitter.x = TRUE,
+#'        xlab = "Genótipo",
+#'        ylab = "Total Geral",
+#'        main = "Competição de Cultivares de Feijão",
+#'        scales = list(x = list(rot = 90)))
+NULL
diff --git a/R/ZimmermannTb16.1.R b/R/ZimmermannTb16.1.R
new file mode 100644
index 0000000000000000000000000000000000000000..13ba80be9ffb7c2d76bb7c1c8a729e4ac737ae1f
--- /dev/null
+++ b/R/ZimmermannTb16.1.R
@@ -0,0 +1,46 @@
+#' @name ZimmermannTb16.1
+#' @aliases ZimmermannTb16.2
+#' @title Análise de Composição do Solo Aluviais
+#' @description Dados de análise de solos aluviais, que apresentaram pH
+#'     abaixo de sete, referentes à associação existente entre teor de
+#'     matéria orgânica no solo (porcentagem) com disponibilidade de
+#'     fósforo (mg kg\eqn{^{-1}}). A amostra tem apenas sete
+#'     observações.
+#' @format Um \code{data.frame} com 7 observações e 7 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{origem}}{Fator de níveis nominais que identifica o local
+#'     de origem da amostra de solo.}
+#'
+#' \item{\code{mo}}{Matéria orgânica no solo (\%).}
+#'
+#' \item{\code{fosf}}{Disponibilidade de fósforo no solo (mg
+#'     kg\eqn{^{-1}}).}
+#'
+#' \item{\code{pmo}}{Posto da váriavel \code{mo}.}
+#'
+#' \item{\code{pfosf}}{Posto da váriavel \code{fosf}.}
+#'
+#' \item{\code{Nc}}{Indica o número de pares de postos concordantes.}
+#'
+#' \item{\code{Nd}}{Indica o número de pares de postos discordantes.}
+#'
+#' }
+#' @keywords correlacao
+#' @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. (Tabela 16.1, pág. 327)
+#' @examples
+#'
+#' data(ZimmermannTb16.1)
+#' str(ZimmermannTb16.1)
+#'
+#' mean(ZimmermannTb16.1$mo)
+#' mean(ZimmermannTb16.1$fosf)
+#'
+#' with(ZimmermannTb16.1, {
+#'     cbind(pmo = rank(mo), pfosf = rank(fosf))
+#' })
+#'
+NULL
diff --git a/R/ZimmermannTb16.3.R b/R/ZimmermannTb16.3.R
new file mode 100644
index 0000000000000000000000000000000000000000..06906df44e07be2fbd1645c7b92ca8eb37c66ac6
--- /dev/null
+++ b/R/ZimmermannTb16.3.R
@@ -0,0 +1,26 @@
+#' @name ZimmermannTb16.3
+#' @title Teores de Matéria Orgânica de Solos de Várzea
+#' @description Teores de matéria orgânica de solos aluviais e gely
+#'     húmicos.
+#' @format Um \code{data.frame} com 14 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{solo}}{Tipo de solo, sendo A - aluviais e B - gley
+#'     húmicos.}
+#'
+#' \item{\code{mo}}{Teor de matéria orgânica do solo (\%).}
+#'
+#' }
+#' @keywords TODO
+#' @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. (Tabela 16.3, pág. 337)
+#' @examples
+#'
+#' # Postos.
+#' rank(ZimmermannTb16.3$mo)
+#'
+#' aggregate(mo ~ solo, data = ZimmermannTb16.3, FUN = mean)
+#'
+NULL
diff --git a/R/ZimmermannTb16.4.R b/R/ZimmermannTb16.4.R
new file mode 100644
index 0000000000000000000000000000000000000000..d3d39136b0a72245b21a01bde9372f7aa63db699
--- /dev/null
+++ b/R/ZimmermannTb16.4.R
@@ -0,0 +1,38 @@
+#' @name ZimmermannTb16.4
+#' @title Hastes Mortas de Arroz por \emph{Elasmopalpus lignosellus} L.
+#' @description Dados de um experimento em delineamento inteiramente
+#'     casualizado que estudou cultivares de arroz, em casa de
+#'     vegetação. Os dados são referentes ao número de hastes mortas por
+#'     \emph{Elasmopalpus lignosellus} por parcela. Cada cultivar foi
+#'     repetida três vezes.
+#' @format Um \code{data.frame} com 9 observações e 3 variáveis
+#'
+#' \describe{
+#'
+#' \item{\code{cult}}{Fator categórico que identifica as cultivares de
+#'     arroz.}
+#'
+#' \item{\code{nmort}}{Número de hastes mortas por \emph{Elasmopalpus
+#'     lignosellus} por parcela.}
+#'
+#' \item{\code{posto}}{Posto da váriavel \code{nmort}.}
+#'
+#' }
+#' @keywords DIC contagem
+#' @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. (Tabela 16.4, pág. 341)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb16.4)
+#' str(ZimmermannTb16.4)
+#'
+#' xyplot(nmort ~ cult, data = ZimmermannTb16.4,
+#'        xlab = "Cultivar",
+#'        ylab = "Número de hastes mortas")
+#'
+#' rank(ZimmermannTb16.4$nmort)
+#'
+NULL
diff --git a/R/ZimmermannTb3.5.R b/R/ZimmermannTb3.5.R
new file mode 100644
index 0000000000000000000000000000000000000000..884c6e3e85fc108708275b0f13fa8f7466251c1a
--- /dev/null
+++ b/R/ZimmermannTb3.5.R
@@ -0,0 +1,51 @@
+#' @name ZimmermannTb3.5
+#' @title Fracionamento da Adubação na Produção de Grãos de Arroz
+#'     Irrigado
+#' @description Dados de um estudo sobre adubação nitrogenada na cultura
+#'     do arroz irrigado. Foram testadas quatros formas de aplicação do
+#'     adubo fazendo o fracionamento das quantidades em diferentes
+#'     épocas. O experimento foi instalado em delineamento inteiramente
+#'     casualizado com 8 repetições.
+#' @format Um \code{data.frame} com 32 observações e 3 variáveis
+#'
+#' \describe{
+#'
+#' \item{\code{trat}}{Fator de níveis categóricos que representa as
+#'     formas de adubação: 1 = 80 kg/ha no plantio, 2 = 40 kg/ha 40 dias
+#'     no plantio após a emergência (DAE), 3 = 13.2 kg/ha no plantio e
+#'     66.8 kg/ha aos 40 DAE, e 4 = 13.2 kg/ha no plantio e 33.4 kg/ha
+#'     aos 40 e 60 DAE.}
+#'
+#' \item{\code{rept}}{Inteiro que identifica as repretições de uma forma
+#'     de adubação.}
+#'
+#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka
+#'     ha\eqn{^{-1}}).}
+#'
+#' }
+#' @keywords DIC
+#' @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. (Tabela 3.5, pág. 54)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb3.5)
+#' str(ZimmermannTb3.5)
+#'
+#' # Quantidade[época].
+#' adub <- expression(80[0],
+#'                    40[0] + 40[40],
+#'                    13.2[0] + 66.8[40],
+#'                    13.2[0] + 33.4[40] + 33.4[60])
+#' xyplot(prod ~ adub, data = ZimmermannTb3.5,
+#'        type = c("p", "a"), jitter.x = TRUE,
+#'        xlab = "Formas de adubação",
+#'        ylab = expression("Produção de arroz"~(kg~ha^{-1})),
+#'        scales = list(x = list(labels = adub)))
+#'
+#' aggregate(prod ~ adub, data = ZimmermannTb3.5,
+#'           FUN = function(x) { c(mean = mean(x), sd = sd(x)) })
+#'
+NULL
diff --git a/R/ZimmermannTb7.4.R b/R/ZimmermannTb7.4.R
new file mode 100644
index 0000000000000000000000000000000000000000..b64afe02ffcfa4669483e0c0eba615fbf8cbf45c
--- /dev/null
+++ b/R/ZimmermannTb7.4.R
@@ -0,0 +1,45 @@
+#' @name ZimmermannTb7.4
+#' @title Produção de Grãos de Arroz em Ensaio Reticulado Retangular
+#' @description Dados de um estudo sobre competição de cultivares e
+#'     linhagens de arroz irrigado quanto a produtividade. O experimento
+#'     foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6
+#'     (blocos de tamanho 5, 6 blocos por repetição), com três
+#'     repetições.
+#' @format Um \code{data.frame} com 90 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{rept}}{Fator categórico que representa as repetições do
+#'     experimento. Cada repetições tem 6 blocos de tamanho 3,
+#'     perfazendo 30 parcelas, uma para cada uma das
+#'     cultivares/linhagens estudadas.}
+#'
+#' \item{\code{bloco}}{Fator categórico que indentifica os blocos.}
+#'
+#' \item{\code{cult}}{Fator categórico que identifica as
+#'     cultivares/linhagens em competição.}
+#'
+#' \item{\code{prod}}{Produção de grãos de arroz irrigado (ka
+#'     ha\eqn{^{-1}}).}
+#'
+#' }
+#' @keywords reticulado
+#' @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. (Tabela 7.4, pág. 140)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb7.4)
+#' str(ZimmermannTb7.4)
+#'
+#' xtabs(~bloc + rept, data = ZimmermannTb7.4)
+#' xtabs(~cult + rept, data = ZimmermannTb7.4)
+#'
+#' xyplot(prod ~ reorder(cult, prod),
+#'        data = ZimmermannTb7.4, type = c("p", "a"),
+#'        xlab = "Cultiavres",
+#'        ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1})))
+#'
+NULL
diff --git a/R/ZimmermannTb8.5.R b/R/ZimmermannTb8.5.R
new file mode 100644
index 0000000000000000000000000000000000000000..7b78123bc8f414b01384a7725a255280b3080128
--- /dev/null
+++ b/R/ZimmermannTb8.5.R
@@ -0,0 +1,43 @@
+#' @name ZimmermannTb8.5
+#' @title Produção de Grãos de Feijão em Delineamento de Blocos Aumentos
+#'     de Federer
+#' @description Dados de um estudo em desenho de blocos aumentados de
+#'     Federer, com total de dezoito blocos, cada um com quatro
+#'     testemunhas (1 a 4), e 12 linhagens, num total de 216
+#'     linhagens. Os dados são de apenas 10 dos blocos, contendo 9
+#'     parcelas em cada um, 4 delas sendo testemunhas e as 5 restantes
+#'     são linhagens. A resposta medida foi a produção de grãos de
+#'     feijão em kg ha\eqn{^{-1}}.
+#' @format Um \code{data.frame} com 90 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{bloc}}{Fator categórico que identifica os blocos do
+#'     experimento. Cada bloco tem tamanho 9.}
+#'
+#' \item{\code{linh}}{Fator categórico que identifica as linhagens do
+#'     experimento. A linhagens identificas de 1 a 4 são as
+#'     testemunhas.}
+#'
+#' \item{\code{prod}}{Produção de grãos de feijão (ka ha\eqn{^{-1}}).}
+#'
+#' }
+#' @keywords BAF
+#' @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. (Tabela 8.5, pág. 158)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb8.5)
+#' str(ZimmermannTb8.5)
+#'
+#' xtabs(~linh, data = ZimmermannTb8.5)
+#' xtabs(~bloc, data = ZimmermannTb8.5)
+#'
+#' xyplot(prod ~ reorder(linh, prod), data = ZimmermannTb8.5,
+#'        xlab = "Linhagens (ordenadas)",
+#'        ylab = expression("Produção de grãos de feijão"~(kg~ha^{-1})))
+#'
+NULL
diff --git a/R/ZimmermannTb9.13.R b/R/ZimmermannTb9.13.R
new file mode 100644
index 0000000000000000000000000000000000000000..94b43eb1d2bc72da63d2406f3dca3a41f7d47cf8
--- /dev/null
+++ b/R/ZimmermannTb9.13.R
@@ -0,0 +1,48 @@
+#' @name ZimmermannTb9.13
+#' @title Matéria Seca de Feijão em Fatorial 3x3
+#' @description Dados de um estudo em ensaio fatorial 3 \eqn{times} 3,
+#'     considerando três níveis de densidade de solo e três doses
+#'     microelementos. Cada vaso continha três plantas de arroz e,
+#'     adicionalmente aos microelementos, foi feita adubação com 4 g por
+#'     vaso de formulado 5-30-15. Os dados são de matéria seca de
+#'     feijão, em escala logarítmica. O experimento foi instalado em
+#'     delineamento de blocos casualizados.
+#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{micro}}{Fator de níveis métricos que são as doses de
+#'     microelementos (FTE-BR-12) aplicado ao solo (g vaso\eqn{^{-1}}).}
+#'
+#' \item{\code{dens}}{Fator de níveis métricos que é densidade do solo
+#'     na qual foram cultivadas as plantas (g dm\eqn{^{-1}}).}
+#'
+#' \item{\code{rept}}{Inteiro que identifica as repetições de cada cela
+#'     experimental.}
+#'
+#' \item{\code{imseca}}{Logaritimo decimal da matéria seca das plantas
+#'     de feijão.}
+#'
+#' }
+#' @keywords FAT fatorial
+#' @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. (Tabela 9.13, pág 179)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb9.13)
+#' str(ZimmermannTb9.13)
+#'
+#' xtabs(~micro + dens, data = ZimmermannTb9.13)
+#'
+#' xyplot(lms ~ dens, data = ZimmermannTb9.13,
+#'        groups = micro, type = c("p", "a"),
+#'        auto.key = list(
+#'            title = expression("Microelementos"~(g~vaso^{-1})),
+#'            cex.title = 1.1, columns = 3),
+#'        xlab = expression("Densidade do solo"~(g~cm^{-3})),
+#'        ylab = "log da matéria seca")
+#'
+NULL
diff --git a/R/ZimmermannTb9.17.R b/R/ZimmermannTb9.17.R
new file mode 100644
index 0000000000000000000000000000000000000000..f910f8ce1dc7c18164121a0f43ce12cd8dce39d0
--- /dev/null
+++ b/R/ZimmermannTb9.17.R
@@ -0,0 +1,52 @@
+#' @name ZimmermannTb9.17
+#' @title Época de Aplicação de NK na Produção de Grãos de Arroz
+#' @description Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3,
+#'     referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O
+#'     delineamento é o de blocos completos ao acaso, com três
+#'     repetições. Foram testados os efeitos do nitrogênio, potássio e
+#'     épocas de aplicação destes elementos na produtividade da soca do
+#'     arroz irrigado.
+#' @format Um \code{data.frame} com 81 observações e 5 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{epoc}}{Fator categórico que representa a época de
+#'     aplicação dos nutrientes.}
+#'
+#' \item{\code{pota}}{Fator categórico que representa a dose de potássio
+#'     aplicada.}
+#'
+#' \item{\code{nitr}}{Fator categórico que representa a dose de
+#'     nitrogênio aplicada.}
+#'
+#' \item{\code{bloc}}{Fator categórico que representa os blocos do
+#'     experimento. Os blocos tinham tamanho \eqn{3^3 = 27}.}
+#'
+#' \item{\code{prod}}{Produção de grão de arroz em (kg ha\eqn{^{-1}}).}
+#'
+#' }
+#' @keywords FAT3
+#' @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. (Tabela 9.17, pág. 182)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb9.17)
+#' str(ZimmermannTb9.17)
+#'
+#' ftable(xtabs(~nitr + pota + epoc, data = ZimmermannTb9.17))
+#'
+#' xyplot(prod ~ nitr | epoc, data = ZimmermannTb9.17,
+#'        groups = pota, type = c("p", "a"),
+#'        as.table = TRUE,
+#'        auto.key = list(title = "Potássio", cex.title = 1.1,
+#'                        columns = 3),
+#'        strip = strip.custom(strip.names = TRUE,
+#'                             var.name = "Época",
+#'                             sep = " : "),
+#'        xlab = "Nitrogênio",
+#'        ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1})))
+#'
+NULL
diff --git a/R/ZimmermannTb9.22.R b/R/ZimmermannTb9.22.R
new file mode 100644
index 0000000000000000000000000000000000000000..d3574741fac0dfd1e57a7e9a9c7883eb4a7c5724
--- /dev/null
+++ b/R/ZimmermannTb9.22.R
@@ -0,0 +1,62 @@
+#' @name ZimmermannTb9.22
+#' @title Fungicidas e Polímero na Infecção de \emph{Fusarium} em
+#'     Sementes
+#' @description Resultados de um experimento fatorial com tratamentos
+#'     adicionais \eqn{3 \times 3 + 2} que estudou o número de sementes
+#'     infectadas por fusaruim em função aplicação de fungicidas às
+#'     sementes e do uso associado de um polímero depois do fungicida ou
+#'     misturado a ele. Os dois tratamentos adicionais era a aplicação
+#'     isolada do polímero e uma testemunha sem qualquer tratamento. O
+#'     experimento foi instalado em delineamento inteiramente
+#'     casualizado.
+#' @format Um \code{data.frame} com 55 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{trat}}{Fator cetegórico que identifica as celas
+#'     experimentais do fatorial com tratamentos adicionais.}
+#'
+#' \item{\code{fung}}{Fator categórico que identifica os níveis dos
+#'     fungicidas aplicados às sementes. Benlate, Captam e Derosal são
+#'     os fungicidas. O polímero puro e uma testemunha também foram
+#'     investigados.}
+#'
+#' \item{\code{aplic}}{Fator categórico que indica a forma de aplicação
+#'     do fungicida em relação ao polímero: antes do polímero, misturado
+#'     com o polímero ou o fungicída puro.}
+#'
+#' \item{\code{nsi}}{Número de sementes infectadas por \emph{fusarium}
+#'     de um total de 40 sementes.}
+#'
+#' }
+#' @keywords DIC binomial
+#' @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. (Tabela 9.22, pág. 188)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(ZimmermannTb9.22)
+#' str(ZimmermannTb9.22)
+#'
+#' xtabs(~fung + aplic, ZimmermannTb9.22)
+#'
+#' xyplot(nsi/40 ~ trat, data = ZimmermannTb9.22,
+#'        xlab = "Tratamentos",
+#'        ylab = "Proporção de sementes infectadas",
+#'        scales = list(x = list(rot = 90)))
+#'
+#' # Gráfico da função arco seno da raíz.
+#' curve(asin(sqrt(x)), from = 0, to = 1)
+#'
+#' # Transformação arco seno da raíz quadrada da proporção.
+#' asin(sqrt(ZimmermannTb9.22$nsi/40))
+#'
+#' # A transformação não elimina os zeros.
+#' xyplot(asin(sqrt(nsi/40)) ~ trat, data = ZimmermannTb9.22,
+#'        xlab = "Tratamentos",
+#'        ylab = "Arco seno da raíz da proporção",
+#'        scales = list(x = list(rot = 90)))
+#'
+NULL
diff --git a/R/ZimmermannTb9.26.R b/R/ZimmermannTb9.26.R
new file mode 100644
index 0000000000000000000000000000000000000000..feb546a1b39b3c8129316b7b8e273a01e1a83890
--- /dev/null
+++ b/R/ZimmermannTb9.26.R
@@ -0,0 +1,48 @@
+#' @name ZimmermannTb9.26
+#' @title Época de Aplicação de NK na Altura de Plantas
+#' @description Dados de um estudo em fatorial \eqn{3^3}, sobre adubação
+#'     nitrogenada e potássica e suas épocas de aplicação. Os dados são
+#'     referentes a altura de plantas no cultivo da soca de arroz
+#'     irrigado. Dados referen-se apenas aos valores do primeiro
+#'     bloco. Veja \code{\link{ZimmermannTb9.17}}.
+#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{epoc}}{Fator categórico que representa a época de
+#'     aplicação dos nutrientes.}
+#'
+#' \item{\code{pota}}{Fator categórico que representa a dose de potássio
+#'     aplicada.}
+#'
+#' \item{\code{nitr}}{Fator categórico que representa a dose de
+#'     nitrogênio aplicada.}
+#'
+#' \item{\code{alt}}{Altura das plantas (cm).}
+#'
+#' }
+#' @keywords FAT3
+#' @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. (Tabela 9.26, pág. 190)
+#' @examples
+#'
+#' library(lattice)
+#' library(latticeExtra)
+#'
+#' data(ZimmermannTb9.26)
+#' str(ZimmermannTb9.26)
+#'
+#' ftable(xtabs(~epoc + nitr + pota, data = ZimmermannTb9.26))
+#'
+#' useOuterStrips(xyplot(alt ~ nitr + pota | epoc, outer = TRUE,
+#'                       data = ZimmermannTb9.26,
+#'                       type = c("p", "a"),
+#'                       xlab = "Níveis de nitrogênio/potássio",
+#'                       ylab = "Altura das plantas (cm)"),
+#'                strip = strip.custom(
+#'                    strip.name = TRUE, var.name = "Época"),
+#'                strip.left = strip.custom(
+#'                    factor.levels = c("Nitrogênio", "Potássio")))
+#'
+NULL
diff --git a/data-raw/.~lock.PimentelTb8.3.1.csv# b/data-raw/.~lock.PimentelTb8.3.1.csv#
deleted file mode 100644
index a9003a76edf406ed0444c6a4b082e00bc1d33570..0000000000000000000000000000000000000000
--- a/data-raw/.~lock.PimentelTb8.3.1.csv#
+++ /dev/null
@@ -1 +0,0 @@
-,petest,petest-G31M-ES2C,19.05.2016 17:04,file:///home/petest/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/.~lock.PimentelTb9.3.1.csv# b/data-raw/.~lock.PimentelTb9.3.1.csv#
deleted file mode 100644
index 382c896b27cf860514ca5941ce92714640cfb236..0000000000000000000000000000000000000000
--- a/data-raw/.~lock.PimentelTb9.3.1.csv#
+++ /dev/null
@@ -1 +0,0 @@
-,petest,petest-G31M-ES2C,24.05.2016 15:19,file:///home/petest/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/ZimmermannTb12.32.txt b/data-raw/ZimmermannTb12.32.txt
new file mode 100644
index 0000000000000000000000000000000000000000..6c6154f43dd3f9672320a6065cf95e9b88fef5e2
--- /dev/null
+++ b/data-raw/ZimmermannTb12.32.txt
@@ -0,0 +1,14 @@
+geno	irrigados	sequeiro	geral
+AN 911120	2645.67	1064	1911.88
+Diamante Negro	2619	1031.33	1875.21
+AN 910390	2583.33	982.67	1854.54
+AN 910375	2583.33	980	1840.45
+AN 910960	2463.33	949	1734.54
+AN 910021	2462.67	860	1729.33
+AN 910970	2369.33	849.33	1646.15
+AN 910902	2358.33	778.33	1638.94
+AN 910961	2337.33	775.67	1612.18
+AN 910891	2317.67	742	1587.37
+Rio Tibagi	2250.33	711	1541.09
+FE 821681	2240	690	1507.88
+FE 732007	2216.67	629.33	1595.2
diff --git a/data-raw/ZimmermannTb12.33.txt b/data-raw/ZimmermannTb12.33.txt
new file mode 100644
index 0000000000000000000000000000000000000000..ab989919d952d360d3221d1024cfce21da2fa9c9
--- /dev/null
+++ b/data-raw/ZimmermannTb12.33.txt
@@ -0,0 +1,14 @@
+geno	irrigados	sequeiro	geral
+AN 911120	63496.08	21280	84776.08
+Diamante Negro	62856	20626.6	83482.6
+AN 910390	61999.92	19653.4	81653.32
+AN 910375	61999.92	19600	81599.92
+AN 910960	59119.92	18980	78099.92
+AN 910021	59104.08	17200	76304.08
+AN 910970	56863.92	16986.6	73850.52
+AN 910902	56599.92	15566.6	72166.52
+AN 910961	56095.92	15513.4	71609.32
+AN 910891	55624.08	14840	70464.08
+Rio Tibagi	54007.92	14220	68227.92
+FE 821681	53760	13800	67560
+FE 732007	53200.08	12586.6	65786.68
diff --git a/data-raw/ZimmermannTb16.1.txt b/data-raw/ZimmermannTb16.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..c1a77ee9723c5c15ffe907acc8f216dd54cf3588
--- /dev/null
+++ b/data-raw/ZimmermannTb16.1.txt
@@ -0,0 +1,8 @@
+origem	mo	fosf	pmo	pfosf	Nc	Nd
+picos	0.6	2	1	1	6	0
+luzi	0.9	16.6	2	4	3	2
+parn	1.1	3.4	3	2	4	0
+piri	1.2	7.2	4	3	3	0
+ipan	1.3	73.3	5	7	0	2
+caico	1.4	30.2	6	5	1	0
+tere	1.5	38.9	7	6	0	0
diff --git a/data-raw/ZimmermannTb16.3.txt b/data-raw/ZimmermannTb16.3.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3ca922a72521e216ff4de20cc68ce2b5e4c6248b
--- /dev/null
+++ b/data-raw/ZimmermannTb16.3.txt
@@ -0,0 +1,15 @@
+solo	mo
+A	0.6
+B	0.7
+A	0.9
+B	0.9
+A	1.1
+A	1.2
+A	1.3
+A	1.4
+A	1.5
+B	1.5
+B	2.2
+B	3.7
+B	10.5
+B	16.8
diff --git a/data-raw/ZimmermannTb16.4.txt b/data-raw/ZimmermannTb16.4.txt
new file mode 100644
index 0000000000000000000000000000000000000000..aafd13bacfee620a36663b9e4742e3019ea36893
--- /dev/null
+++ b/data-raw/ZimmermannTb16.4.txt
@@ -0,0 +1,10 @@
+cult	nmort	porto
+A	12	4
+A	13	5
+A	15	7
+B	11	3
+B	9	2
+B	7	1
+C	16	8
+C	17	9
+C	14	6
diff --git a/data-raw/ZimmermannTb3.5.txt b/data-raw/ZimmermannTb3.5.txt
new file mode 100644
index 0000000000000000000000000000000000000000..bf27df3ab561c558a666204ceb1676cfa3e094c6
--- /dev/null
+++ b/data-raw/ZimmermannTb3.5.txt
@@ -0,0 +1,33 @@
+adub	rept	prod
+1	1	6276
+1	2	6035
+1	3	6086
+1	4	5594
+1	5	6321
+1	6	6746
+1	7	5751
+1	8	6191
+2	1	7199
+2	2	6890
+2	3	6586
+2	4	7149
+2	5	6657
+2	6	6210
+2	7	6128
+2	8	6393
+3	1	6457
+3	2	6174
+3	3	6612
+3	4	6087
+3	5	5797
+3	6	5865
+3	7	6498
+3	8	6486
+4	1	7202
+4	2	7173
+4	3	7169
+4	4	6590
+4	5	6444
+4	6	6740
+4	7	6370
+4	8	7270
diff --git a/data-raw/ZimmermannTb7.4.txt b/data-raw/ZimmermannTb7.4.txt
new file mode 100644
index 0000000000000000000000000000000000000000..2e62906b144c6ddecfa6591f49355561e9cec42e
--- /dev/null
+++ b/data-raw/ZimmermannTb7.4.txt
@@ -0,0 +1,91 @@
+rept	bloc	cult	prod
+X	X1	5	4256.32
+X	X1	1	4628.45
+X	X1	4	4889.94
+X	X1	3	3713.22
+X	X1	2	4602.3
+X	X2	10	5710.34
+X	X2	9	5974.71
+X	X2	6	4236.21
+X	X2	8	5622.13
+X	X2	7	5386.78
+X	X3	15	7164.94
+X	X3	13	4150.57
+X	X3	12	4994.54
+X	X3	11	5543.68
+X	X3	14	5017.24
+X	X4	20	4916.09
+X	X4	17	6439.66
+X	X4	16	5517.53
+X	X4	18	5517.53
+X	X4	19	5256.03
+X	X5	21	5612.07
+X	X5	25	5177.59
+X	X5	23	4758.62
+X	X5	24	5595.98
+X	X5	22	5151.44
+X	X6	30	6929.6
+X	X6	29	4445.4
+X	X6	28	7243.39
+X	X6	26	3516.09
+X	X6	27	4393.1
+Y	Y1	21	5181.61
+Y	Y1	11	4968.39
+Y	Y1	26	4445.4
+Y	Y1	6	5445.98
+Y	Y1	16	5962.07
+Y	Y2	1	4573.56
+Y	Y2	22	5181.61
+Y	Y2	12	5657.47
+Y	Y2	17	6529.89
+Y	Y2	27	4785.34
+Y	Y3	7	6197.41
+Y	Y3	28	7217.24
+Y	Y3	23	4520.69
+Y	Y3	2	5334.48
+Y	Y3	18	5525.29
+Y	Y4	24	6275.86
+Y	Y4	8	5710.34
+Y	Y4	3	5287.36
+Y	Y4	29	5909.77
+Y	Y4	13	6344.83
+Y	Y5	14	6066.67
+Y	Y5	30	7086.49
+Y	Y5	19	6397.7
+Y	Y5	4	3739.37
+Y	Y5	9	5419.54
+Y	Y6	10	5419.54
+Y	Y6	25	5049.43
+Y	Y6	15	5419.54
+Y	Y6	5	3859.77
+Y	Y6	20	5948.28
+Z	Z1	7	5282.18
+Z	Z1	27	5177.59
+Z	Z1	13	4445.4
+Z	Z1	25	6249.71
+Z	Z1	19	6537.36
+Z	Z2	29	5831.32
+Z	Z2	14	5099.14
+Z	Z2	16	6589.66
+Z	Z2	23	4629.31
+Z	Z2	5	4282.76
+Z	Z3	1	6223.56
+Z	Z3	21	5726.72
+Z	Z3	30	6979.31
+Z	Z3	8	6118.97
+Z	Z3	20	5700.57
+Z	Z4	22	4229.89
+Z	Z4	2	4994.54
+Z	Z4	26	3164.08
+Z	Z4	15	6825
+Z	Z4	9	5445.98
+Z	Z5	3	3556.32
+Z	Z5	11	4441.38
+Z	Z5	17	5075.86
+Z	Z5	10	4236.21
+Z	Z5	28	7687.93
+Z	Z6	12	5525.29
+Z	Z6	6	5831.32
+Z	Z6	24	5818.97
+Z	Z6	18	5974.71
+Z	Z6	4	4863.79
diff --git a/data-raw/ZimmermannTb8.5.txt b/data-raw/ZimmermannTb8.5.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3843e5eca38a321ed1dd969da274b7fc54fc9060
--- /dev/null
+++ b/data-raw/ZimmermannTb8.5.txt
@@ -0,0 +1,91 @@
+bloc	linh	prod
+1	9	761
+1	5	1516
+1	8	1692
+1	3	1563
+1	4	2019
+1	1	2003
+1	2	1671
+1	6	1245
+1	7	1203
+2	21	1536
+2	20	1888
+2	2	1838
+2	3	1818
+2	4	2210
+2	1	1866
+2	17	1786
+2	18	1756
+2	19	2037
+3	30	1052
+3	1	1695
+3	29	1080
+3	31	1443
+3	2	1472
+3	4	1745
+3	3	1680
+3	32	1123
+3	33	1632
+4	2	1113
+4	41	1357
+4	42	1219
+4	45	1135
+4	43	1076
+4	44	1384
+4	3	1516
+4	1	1773
+4	4	1881
+5	3	1959
+5	57	1503
+5	1	2085
+5	2	1454
+5	4	1837
+5	53	1873
+5	55	1243
+5	54	1212
+5	56	1509
+6	67	1414
+6	65	1279
+6	4	2077
+6	68	1586
+6	1	1846
+6	69	1956
+6	3	1775
+6	2	1728
+6	66	1546
+7	80	2213
+7	2	1930
+7	79	2653
+7	3	2054
+7	78	2361
+7	81	1812
+7	1	1849
+7	77	1885
+7	4	1835
+8	90	1145
+8	91	1194
+8	89	1920
+8	2	1415
+8	3	1589
+8	92	1138
+8	1	1840
+8	4	2062
+8	93	1418
+9	3	1894
+9	1	1695
+9	102	1885
+9	101	1433
+9	105	1803
+9	104	1451
+9	4	1975
+9	103	1879
+9	2	1675
+10	115	2356
+10	114	1450
+10	4	2191
+10	117	2351
+10	2	1687
+10	113	2180
+10	1	1757
+10	3	1879
+10	116	1605
diff --git a/data-raw/ZimmermannTb9.13.txt b/data-raw/ZimmermannTb9.13.txt
new file mode 100644
index 0000000000000000000000000000000000000000..efef122df2900bb82dd427ead3b9850da1481952
--- /dev/null
+++ b/data-raw/ZimmermannTb9.13.txt
@@ -0,0 +1,28 @@
+micro	dens	rept	lms
+0	1.12	1	2.9638
+0	1.12	2	3.3324
+0	1.12	3	3.3927
+1	1.12	1	3.5515
+1	1.12	2	3.8698
+1	1.12	3	3.4713
+2	1.12	1	3.4014
+2	1.12	2	2.9494
+2	1.12	3	2.9638
+0	1.26	1	3.6425
+0	1.26	2	3.281
+0	1.26	3	3.7324
+1	1.26	1	3.4886
+1	1.26	2	3.4472
+1	1.26	3	3.5575
+2	1.26	1	3.2553
+2	1.26	2	3.7753
+2	1.26	3	3.8768
+0	1.39	1	3.6599
+0	1.39	2	3.8075
+0	1.39	3	3.9112
+1	1.39	1	3.7016
+1	1.39	2	3.5611
+1	1.39	3	3.1523
+2	1.39	1	3.6484
+2	1.39	2	3.5775
+2	1.39	3	3.659
diff --git a/data-raw/ZimmermannTb9.17.txt b/data-raw/ZimmermannTb9.17.txt
new file mode 100644
index 0000000000000000000000000000000000000000..6b7472c3e8cedafe5580bbd59944ef556c7fab4d
--- /dev/null
+++ b/data-raw/ZimmermannTb9.17.txt
@@ -0,0 +1,82 @@
+epoc	pota	nitr	bloc	prod
+1	1	1	1	1066.31
+2	1	1	1	1022.19
+3	1	1	1	1137.93
+1	2	1	1	922.84
+2	2	1	1	1056.45
+3	2	1	1	747.22
+1	3	1	1	914.94
+2	3	1	1	718.15
+3	3	1	1	671.6
+1	1	2	1	1090.63
+2	1	2	1	1508.95
+3	1	2	1	1003.57
+1	2	2	1	1108.57
+2	2	2	1	974.27
+3	2	2	1	1518.25
+1	3	2	1	1494
+2	3	2	1	875.19
+3	3	2	1	1387.65
+1	1	3	1	826.87
+2	1	3	1	1394.67
+3	1	3	1	871.14
+1	2	3	1	788.42
+2	2	3	1	1074.87
+3	2	3	1	910.33
+1	3	3	1	913.07
+2	3	3	1	1057.2
+3	3	3	1	1452.94
+1	1	1	2	886.36
+2	1	1	2	841.58
+3	1	1	2	1393.92
+1	2	1	2	943.84
+2	2	1	2	506.26
+3	2	1	2	697.66
+1	3	1	2	858.15
+2	3	1	2	860.4
+3	3	1	2	1050.53
+1	1	2	2	882.44
+2	1	2	2	1352.49
+3	1	2	2	887.54
+1	2	2	2	1759.42
+2	2	2	2	1242.17
+3	2	2	2	1331.46
+1	3	2	2	1001.68
+2	3	2	2	411.64
+3	3	2	2	1368.2
+1	1	3	2	1958.82
+2	1	3	2	964.25
+3	1	3	2	1031.83
+1	2	3	2	530.53
+2	2	3	2	554.86
+3	2	3	2	936.04
+1	3	3	2	1318.21
+2	3	3	2	786.19
+3	3	3	2	1454.63
+1	1	1	3	1125.69
+2	1	1	3	1509.76
+3	1	1	3	1259.35
+1	2	1	3	1454.8
+2	2	1	3	983.85
+3	2	1	3	783.39
+1	3	1	3	719.37
+2	3	1	3	603.87
+3	3	1	3	784.58
+1	1	2	3	1067.93
+2	1	2	3	901.28
+3	1	2	3	742.91
+1	2	2	3	660.58
+2	2	2	3	716.86
+3	2	2	3	1048.17
+1	3	2	3	1941.66
+2	3	2	3	825.1
+3	3	2	3	810.17
+1	1	3	3	986.09
+2	1	3	3	1126.04
+3	1	3	3	1472.08
+1	2	3	3	916.45
+2	2	3	3	754.31
+3	2	3	3	760.7
+1	3	3	3	998.53
+2	3	3	3	978.79
+3	3	3	3	1654.82
diff --git a/data-raw/ZimmermannTb9.22.txt b/data-raw/ZimmermannTb9.22.txt
new file mode 100644
index 0000000000000000000000000000000000000000..89534f647e8b3b213dbaf1bf71ee4d1327bf0f96
--- /dev/null
+++ b/data-raw/ZimmermannTb9.22.txt
@@ -0,0 +1,56 @@
+trat	fung	aplic	nsi
+benlate puro	benlate	puro	5
+benlate antes	benlate	antes	1
+benlate misturado	benlate	misturado	3
+captam puro	captam	puro	7
+captam antes	captam	antes	3
+captam misturado	captam	misturado	6
+derosal puro	derosal	puro	0
+derosal antes	derosal	antes	0
+derosal misturado	derosal	misturado	0
+polimero	polimero	polimero	6
+testemunha	testemunha	testemunha	14
+benlate puro	benlate	puro	0
+benlate antes	benlate	antes	1
+benlate misturado	benlate	misturado	0
+captam puro	captam	puro	8
+captam antes	captam	antes	0
+captam misturado	captam	misturado	5
+derosal puro	derosal	puro	0
+derosal antes	derosal	antes	0
+derosal misturado	derosal	misturado	0
+polimero	polimero	polimero	7
+testemunha	testemunha	testemunha	8
+benlate puro	benlate	puro	0
+benlate antes	benlate	antes	0
+benlate misturado	benlate	misturado	2
+captam puro	captam	puro	5
+captam antes	captam	antes	0
+captam misturado	captam	misturado	6
+derosal puro	derosal	puro	0
+derosal antes	derosal	antes	0
+derosal misturado	derosal	misturado	0
+polimero	polimero	polimero	5
+testemunha	testemunha	testemunha	7
+benlate puro	benlate	puro	0
+benlate antes	benlate	antes	0
+benlate misturado	benlate	misturado	0
+captam puro	captam	puro	13
+captam antes	captam	antes	5
+captam misturado	captam	misturado	6
+derosal puro	derosal	puro	2
+derosal antes	derosal	antes	1
+derosal misturado	derosal	misturado	0
+polimero	polimero	polimero	9
+testemunha	testemunha	testemunha	10
+benlate puro	benlate	puro	0
+benlate antes	benlate	antes	0
+benlate misturado	benlate	misturado	5
+captam puro	captam	puro	4
+captam antes	captam	antes	0
+captam misturado	captam	misturado	4
+derosal puro	derosal	puro	0
+derosal antes	derosal	antes	0
+derosal misturado	derosal	misturado	0
+polimero	polimero	polimero	11
+testemunha	testemunha	testemunha	6
diff --git a/data-raw/ZimmermannTb9.26.txt b/data-raw/ZimmermannTb9.26.txt
new file mode 100644
index 0000000000000000000000000000000000000000..3c570f9de376a896ace0ae39e59fe249e188351f
--- /dev/null
+++ b/data-raw/ZimmermannTb9.26.txt
@@ -0,0 +1,28 @@
+epoc	pota	nitr	alt
+1	1	1	56.9
+2	1	1	55.9
+3	1	1	53.3
+1	2	1	56.7
+2	2	1	57.4
+3	2	1	52.1
+1	3	1	51.5
+2	3	1	55.5
+3	3	1	49
+1	1	2	57.6
+2	1	2	55.4
+3	1	2	56.7
+1	2	2	55.1
+2	2	2	53.2
+3	2	2	60.3
+1	3	2	52.7
+2	3	2	57
+3	3	2	59.2
+1	1	3	57.5
+2	1	3	54.7
+3	1	3	55.8
+1	2	3	55.4
+2	2	3	57.2
+3	2	3	55.6
+1	3	3	56.1
+2	3	3	61
+3	3	3	57.3
diff --git a/data/ZimmermannTb12.32.rda b/data/ZimmermannTb12.32.rda
new file mode 100644
index 0000000000000000000000000000000000000000..d873f150c69baf06d5fef7214472db2a690b809f
Binary files /dev/null and b/data/ZimmermannTb12.32.rda differ
diff --git a/data/ZimmermannTb12.33.rda b/data/ZimmermannTb12.33.rda
new file mode 100644
index 0000000000000000000000000000000000000000..34b9abfe22b30ca2b7460a7a17857060fea93e04
Binary files /dev/null and b/data/ZimmermannTb12.33.rda differ
diff --git a/data/ZimmermannTb16.1.rda b/data/ZimmermannTb16.1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..c2c8b8d490c38e151dedb89069c0b4080b68f27e
Binary files /dev/null and b/data/ZimmermannTb16.1.rda differ
diff --git a/data/ZimmermannTb16.3.rda b/data/ZimmermannTb16.3.rda
new file mode 100644
index 0000000000000000000000000000000000000000..d31ef88ffe9c412c6a983fc852e2e607db0386d5
Binary files /dev/null and b/data/ZimmermannTb16.3.rda differ
diff --git a/data/ZimmermannTb16.4.rda b/data/ZimmermannTb16.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..2907c71101faaedfbe4a8284ff213e7b362d6265
Binary files /dev/null and b/data/ZimmermannTb16.4.rda differ
diff --git a/data/ZimmermannTb3.5.rda b/data/ZimmermannTb3.5.rda
new file mode 100644
index 0000000000000000000000000000000000000000..ca3cee818a2f54b037e88591ff74b934651b6fe7
Binary files /dev/null and b/data/ZimmermannTb3.5.rda differ
diff --git a/data/ZimmermannTb7.4.rda b/data/ZimmermannTb7.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..d8057ee77af775bf2c90478adf5249d6bb78aec3
Binary files /dev/null and b/data/ZimmermannTb7.4.rda differ
diff --git a/data/ZimmermannTb8.5.rda b/data/ZimmermannTb8.5.rda
new file mode 100644
index 0000000000000000000000000000000000000000..81141bb13d9698a7edf800e26d3c1bd5aea938ed
Binary files /dev/null and b/data/ZimmermannTb8.5.rda differ
diff --git a/data/ZimmermannTb9.13.rda b/data/ZimmermannTb9.13.rda
new file mode 100644
index 0000000000000000000000000000000000000000..3086f7b31ca008ec460236790e1cbef95de17ee7
Binary files /dev/null and b/data/ZimmermannTb9.13.rda differ
diff --git a/data/ZimmermannTb9.17.rda b/data/ZimmermannTb9.17.rda
new file mode 100644
index 0000000000000000000000000000000000000000..4cbaf5a469a234ba458de921ecadc4dcda94be37
Binary files /dev/null and b/data/ZimmermannTb9.17.rda differ
diff --git a/data/ZimmermannTb9.22.rda b/data/ZimmermannTb9.22.rda
new file mode 100644
index 0000000000000000000000000000000000000000..ca1cc7570959d2da2cf911c65f9fc57ee4c036cd
Binary files /dev/null and b/data/ZimmermannTb9.22.rda differ
diff --git a/data/ZimmermannTb9.26.rda b/data/ZimmermannTb9.26.rda
new file mode 100644
index 0000000000000000000000000000000000000000..712c524c7f050681c57d741c67d6e4a31a7b8d1c
Binary files /dev/null and b/data/ZimmermannTb9.26.rda differ
diff --git a/man/ZimmermannTb12.32.Rd b/man/ZimmermannTb12.32.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..4a69a03983f202f03fd0a777296bac9766b3d869
--- /dev/null
+++ b/man/ZimmermannTb12.32.Rd
@@ -0,0 +1,48 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb12.32.R
+\name{ZimmermannTb12.32}
+\alias{ZimmermannTb12.32}
+\title{Competição de Cultivares de Feijão}
+\format{Um \code{data.frame} com 13 observações e 4 variáveis
+
+\describe{
+
+\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
+    da observação.}
+
+\item{\code{irrigados}}{Médias nos ensaios irrigados.}
+
+\item{\code{sequeiro}}{Médias nos ensaios de sequeiro.}
+
+\item{\code{geral}}{Média geral.}
+
+}}
+\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. (Tabela 12.32, pág 264)
+}
+\description{
+Dados de um estudo em delineamento de blocos completos com 
+    quatro repetições. O experimento foi um ensaio de competição de
+    cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
+    São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro
+    e geral.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb12.32)
+
+str(ZimmermannTb12.32)
+
+xyplot(geral ~ geno, data = ZimmermannTb12.32,
+       type = "o", jitter.x = TRUE,
+       xlab = "Genótipo",
+       ylab = "Média Geral",
+       main = "Competição de Cultivares de Feijão",
+       scales = list(x = list(rot = 90)))
+}
+\keyword{DBC}
+
diff --git a/man/ZimmermannTb12.33.Rd b/man/ZimmermannTb12.33.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..c51505d46c5b8f68751c1198b6c8a8ffba738222
--- /dev/null
+++ b/man/ZimmermannTb12.33.Rd
@@ -0,0 +1,48 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb12.33.R
+\name{ZimmermannTb12.33}
+\alias{ZimmermannTb12.33}
+\title{Competição de Cultivares de Feijão}
+\format{Um \code{data.frame} com 13 observações e 4 variáveis
+
+\describe{
+
+\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição 
+    da observação.}
+
+\item{\code{irrigados}}{Totais nos ensaios irrigados.}
+
+\item{\code{sequeiro}}{Totais nos ensaios de sequeiro.}
+
+\item{\code{geral}}{Total geral.}
+
+}}
+\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. (Tabela 12.33, pág 265)
+}
+\description{
+Dados de um estudo em delineamento de blocos completos com 
+    quatro repetições. O experimento foi um ensaio de competição de
+    cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro.
+    São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro
+    e geral.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb12.33)
+
+str(ZimmermannTb12.33)
+
+xyplot(geral ~ geno, data = ZimmermannTb12.33,
+       type = "o", jitter.x = TRUE,
+       xlab = "Genótipo",
+       ylab = "Total Geral",
+       main = "Competição de Cultivares de Feijão",
+       scales = list(x = list(rot = 90)))
+}
+\keyword{DBC}
+
diff --git a/man/ZimmermannTb16.1.Rd b/man/ZimmermannTb16.1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..42353c1059fafcfe0af155fbbb70c09e698ad446
--- /dev/null
+++ b/man/ZimmermannTb16.1.Rd
@@ -0,0 +1,54 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb16.1.R
+\name{ZimmermannTb16.1}
+\alias{ZimmermannTb16.1}
+\alias{ZimmermannTb16.2}
+\title{Análise de Composição do Solo Aluviais}
+\format{Um \code{data.frame} com 7 observações e 7 variáveis, em que
+
+\describe{
+
+\item{\code{origem}}{Fator de níveis nominais que identifica o local
+    de origem da amostra de solo.}
+
+\item{\code{mo}}{Matéria orgânica no solo (\%).}
+
+\item{\code{fosf}}{Disponibilidade de fósforo no solo (mg
+    kg\eqn{^{-1}}).}
+
+\item{\code{pmo}}{Posto da váriavel \code{mo}.}
+
+\item{\code{pfosf}}{Posto da váriavel \code{fosf}.}
+
+\item{\code{Nc}}{Indica o número de pares de postos concordantes.}
+
+\item{\code{Nd}}{Indica o número de pares de postos discordantes.}
+
+}}
+\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. (Tabela 16.1, pág. 327)
+}
+\description{
+Dados de análise de solos aluviais, que apresentaram pH
+    abaixo de sete, referentes à associação existente entre teor de
+    matéria orgânica no solo (porcentagem) com disponibilidade de
+    fósforo (mg kg\eqn{^{-1}}). A amostra tem apenas sete
+    observações.
+}
+\examples{
+
+data(ZimmermannTb16.1)
+str(ZimmermannTb16.1)
+
+mean(ZimmermannTb16.1$mo)
+mean(ZimmermannTb16.1$fosf)
+
+with(ZimmermannTb16.1, {
+    cbind(pmo = rank(mo), pfosf = rank(fosf))
+})
+
+}
+\keyword{correlacao}
+
diff --git a/man/ZimmermannTb16.3.Rd b/man/ZimmermannTb16.3.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..4240a666527ac848ef6423a2678bc27531970edf
--- /dev/null
+++ b/man/ZimmermannTb16.3.Rd
@@ -0,0 +1,34 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb16.3.R
+\name{ZimmermannTb16.3}
+\alias{ZimmermannTb16.3}
+\title{Teores de Matéria Orgânica de Solos de Várzea}
+\format{Um \code{data.frame} com 14 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{solo}}{Tipo de solo, sendo A - aluviais e B - gley
+    húmicos.}
+
+\item{\code{mo}}{Teor de matéria orgânica do solo (\%).}
+
+}}
+\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. (Tabela 16.3, pág. 337)
+}
+\description{
+Teores de matéria orgânica de solos aluviais e gely
+    húmicos.
+}
+\examples{
+
+# Postos.
+rank(ZimmermannTb16.3$mo)
+
+aggregate(mo ~ solo, data = ZimmermannTb16.3, FUN = mean)
+
+}
+\keyword{TODO}
+
diff --git a/man/ZimmermannTb16.4.Rd b/man/ZimmermannTb16.4.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..2e8f87ab35d199b9aa1a49037b7424d49d1b9d0b
--- /dev/null
+++ b/man/ZimmermannTb16.4.Rd
@@ -0,0 +1,47 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb16.4.R
+\name{ZimmermannTb16.4}
+\alias{ZimmermannTb16.4}
+\title{Hastes Mortas de Arroz por \emph{Elasmopalpus lignosellus} L.}
+\format{Um \code{data.frame} com 9 observações e 3 variáveis
+
+\describe{
+
+\item{\code{cult}}{Fator categórico que identifica as cultivares de
+    arroz.}
+
+\item{\code{nmort}}{Número de hastes mortas por \emph{Elasmopalpus
+    lignosellus} por parcela.}
+
+\item{\code{posto}}{Posto da váriavel \code{nmort}.}
+
+}}
+\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. (Tabela 16.4, pág. 341)
+}
+\description{
+Dados de um experimento em delineamento inteiramente
+    casualizado que estudou cultivares de arroz, em casa de
+    vegetação. Os dados são referentes ao número de hastes mortas por
+    \emph{Elasmopalpus lignosellus} por parcela. Cada cultivar foi
+    repetida três vezes.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb16.4)
+str(ZimmermannTb16.4)
+
+xyplot(nmort ~ cult, data = ZimmermannTb16.4,
+       xlab = "Cultivar",
+       ylab = "Número de hastes mortas")
+
+rank(ZimmermannTb16.4$nmort)
+
+}
+\keyword{DIC}
+\keyword{contagem}
+
diff --git a/man/ZimmermannTb3.5.Rd b/man/ZimmermannTb3.5.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..61755ea1a5a25ef83fc0eff812f1ffc2586b840b
--- /dev/null
+++ b/man/ZimmermannTb3.5.Rd
@@ -0,0 +1,59 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb3.5.R
+\name{ZimmermannTb3.5}
+\alias{ZimmermannTb3.5}
+\title{Fracionamento da Adubação na Produção de Grãos de Arroz
+    Irrigado}
+\format{Um \code{data.frame} com 32 observações e 3 variáveis
+
+\describe{
+
+\item{\code{trat}}{Fator de níveis categóricos que representa as
+    formas de adubação: 1 = 80 kg/ha no plantio, 2 = 40 kg/ha 40 dias
+    no plantio após a emergência (DAE), 3 = 13.2 kg/ha no plantio e
+    66.8 kg/ha aos 40 DAE, e 4 = 13.2 kg/ha no plantio e 33.4 kg/ha
+    aos 40 e 60 DAE.}
+
+\item{\code{rept}}{Inteiro que identifica as repretições de uma forma
+    de adubação.}
+
+\item{\code{prod}}{Produção de grãos de arroz irrigado (ka
+    ha\eqn{^{-1}}).}
+
+}}
+\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. (Tabela 3.5, pág. 54)
+}
+\description{
+Dados de um estudo sobre adubação nitrogenada na cultura
+    do arroz irrigado. Foram testadas quatros formas de aplicação do
+    adubo fazendo o fracionamento das quantidades em diferentes
+    épocas. O experimento foi instalado em delineamento inteiramente
+    casualizado com 8 repetições.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb3.5)
+str(ZimmermannTb3.5)
+
+# Quantidade[época].
+adub <- expression(80[0],
+                   40[0] + 40[40],
+                   13.2[0] + 66.8[40],
+                   13.2[0] + 33.4[40] + 33.4[60])
+xyplot(prod ~ adub, data = ZimmermannTb3.5,
+       type = c("p", "a"), jitter.x = TRUE,
+       xlab = "Formas de adubação",
+       ylab = expression("Produção de arroz"~(kg~ha^{-1})),
+       scales = list(x = list(labels = adub)))
+
+aggregate(prod ~ adub, data = ZimmermannTb3.5,
+          FUN = function(x) { c(mean = mean(x), sd = sd(x)) })
+
+}
+\keyword{DIC}
+
diff --git a/man/ZimmermannTb7.4.Rd b/man/ZimmermannTb7.4.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..5392e24b7b1abf6bb6af801af932c62a7c1eda1d
--- /dev/null
+++ b/man/ZimmermannTb7.4.Rd
@@ -0,0 +1,53 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb7.4.R
+\name{ZimmermannTb7.4}
+\alias{ZimmermannTb7.4}
+\title{Produção de Grãos de Arroz em Ensaio Reticulado Retangular}
+\format{Um \code{data.frame} com 90 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{rept}}{Fator categórico que representa as repetições do
+    experimento. Cada repetições tem 6 blocos de tamanho 3,
+    perfazendo 30 parcelas, uma para cada uma das
+    cultivares/linhagens estudadas.}
+
+\item{\code{bloco}}{Fator categórico que indentifica os blocos.}
+
+\item{\code{cult}}{Fator categórico que identifica as
+    cultivares/linhagens em competição.}
+
+\item{\code{prod}}{Produção de grãos de arroz irrigado (ka
+    ha\eqn{^{-1}}).}
+
+}}
+\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. (Tabela 7.4, pág. 140)
+}
+\description{
+Dados de um estudo sobre competição de cultivares e
+    linhagens de arroz irrigado quanto a produtividade. O experimento
+    foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6
+    (blocos de tamanho 5, 6 blocos por repetição), com três
+    repetições.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb7.4)
+str(ZimmermannTb7.4)
+
+xtabs(~bloc + rept, data = ZimmermannTb7.4)
+xtabs(~cult + rept, data = ZimmermannTb7.4)
+
+xyplot(prod ~ reorder(cult, prod),
+       data = ZimmermannTb7.4, type = c("p", "a"),
+       xlab = "Cultiavres",
+       ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1})))
+
+}
+\keyword{reticulado}
+
diff --git a/man/ZimmermannTb8.5.Rd b/man/ZimmermannTb8.5.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..6d766afdf23d6384b8fa7ac43b9f18022ecab212
--- /dev/null
+++ b/man/ZimmermannTb8.5.Rd
@@ -0,0 +1,51 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb8.5.R
+\name{ZimmermannTb8.5}
+\alias{ZimmermannTb8.5}
+\title{Produção de Grãos de Feijão em Delineamento de Blocos Aumentos
+    de Federer}
+\format{Um \code{data.frame} com 90 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{bloc}}{Fator categórico que identifica os blocos do
+    experimento. Cada bloco tem tamanho 9.}
+
+\item{\code{linh}}{Fator categórico que identifica as linhagens do
+    experimento. A linhagens identificas de 1 a 4 são as
+    testemunhas.}
+
+\item{\code{prod}}{Produção de grãos de feijão (ka ha\eqn{^{-1}}).}
+
+}}
+\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. (Tabela 8.5, pág. 158)
+}
+\description{
+Dados de um estudo em desenho de blocos aumentados de
+    Federer, com total de dezoito blocos, cada um com quatro
+    testemunhas (1 a 4), e 12 linhagens, num total de 216
+    linhagens. Os dados são de apenas 10 dos blocos, contendo 9
+    parcelas em cada um, 4 delas sendo testemunhas e as 5 restantes
+    são linhagens. A resposta medida foi a produção de grãos de
+    feijão em kg ha\eqn{^{-1}}.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb8.5)
+str(ZimmermannTb8.5)
+
+xtabs(~linh, data = ZimmermannTb8.5)
+xtabs(~bloc, data = ZimmermannTb8.5)
+
+xyplot(prod ~ reorder(linh, prod), data = ZimmermannTb8.5,
+       xlab = "Linhagens (ordenadas)",
+       ylab = expression("Produção de grãos de feijão"~(kg~ha^{-1})))
+
+}
+\keyword{BAF}
+
diff --git a/man/ZimmermannTb9.13.Rd b/man/ZimmermannTb9.13.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..214e49ff9e8277cf0d3386bb5edf57c82a9fd3c4
--- /dev/null
+++ b/man/ZimmermannTb9.13.Rd
@@ -0,0 +1,57 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb9.13.R
+\name{ZimmermannTb9.13}
+\alias{ZimmermannTb9.13}
+\title{Matéria Seca de Feijão em Fatorial 3x3}
+\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{micro}}{Fator de níveis métricos que são as doses de
+    microelementos (FTE-BR-12) aplicado ao solo (g vaso\eqn{^{-1}}).}
+
+\item{\code{dens}}{Fator de níveis métricos que é densidade do solo
+    na qual foram cultivadas as plantas (g dm\eqn{^{-1}}).}
+
+\item{\code{rept}}{Inteiro que identifica as repetições de cada cela
+    experimental.}
+
+\item{\code{imseca}}{Logaritimo decimal da matéria seca das plantas
+    de feijão.}
+
+}}
+\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. (Tabela 9.13, pág 179)
+}
+\description{
+Dados de um estudo em ensaio fatorial 3 \eqn{times} 3,
+    considerando três níveis de densidade de solo e três doses
+    microelementos. Cada vaso continha três plantas de arroz e,
+    adicionalmente aos microelementos, foi feita adubação com 4 g por
+    vaso de formulado 5-30-15. Os dados são de matéria seca de
+    feijão, em escala logarítmica. O experimento foi instalado em
+    delineamento de blocos casualizados.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb9.13)
+str(ZimmermannTb9.13)
+
+xtabs(~micro + dens, data = ZimmermannTb9.13)
+
+xyplot(lms ~ dens, data = ZimmermannTb9.13,
+       groups = micro, type = c("p", "a"),
+       auto.key = list(
+           title = expression("Microelementos"~(g~vaso^{-1})),
+           cex.title = 1.1, columns = 3),
+       xlab = expression("Densidade do solo"~(g~cm^{-3})),
+       ylab = "log da matéria seca")
+
+}
+\keyword{FAT}
+\keyword{fatorial}
+
diff --git a/man/ZimmermannTb9.17.Rd b/man/ZimmermannTb9.17.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..b3ce8fa3ebb02ed1a3e7427a9c6873de48645c00
--- /dev/null
+++ b/man/ZimmermannTb9.17.Rd
@@ -0,0 +1,60 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb9.17.R
+\name{ZimmermannTb9.17}
+\alias{ZimmermannTb9.17}
+\title{Época de Aplicação de NK na Produção de Grãos de Arroz}
+\format{Um \code{data.frame} com 81 observações e 5 variáveis, em que
+
+\describe{
+
+\item{\code{epoc}}{Fator categórico que representa a época de
+    aplicação dos nutrientes.}
+
+\item{\code{pota}}{Fator categórico que representa a dose de potássio
+    aplicada.}
+
+\item{\code{nitr}}{Fator categórico que representa a dose de
+    nitrogênio aplicada.}
+
+\item{\code{bloc}}{Fator categórico que representa os blocos do
+    experimento. Os blocos tinham tamanho \eqn{3^3 = 27}.}
+
+\item{\code{prod}}{Produção de grão de arroz em (kg ha\eqn{^{-1}}).}
+
+}}
+\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. (Tabela 9.17, pág. 182)
+}
+\description{
+Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3,
+    referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O
+    delineamento é o de blocos completos ao acaso, com três
+    repetições. Foram testados os efeitos do nitrogênio, potássio e
+    épocas de aplicação destes elementos na produtividade da soca do
+    arroz irrigado.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb9.17)
+str(ZimmermannTb9.17)
+
+ftable(xtabs(~nitr + pota + epoc, data = ZimmermannTb9.17))
+
+xyplot(prod ~ nitr | epoc, data = ZimmermannTb9.17,
+       groups = pota, type = c("p", "a"),
+       as.table = TRUE,
+       auto.key = list(title = "Potássio", cex.title = 1.1,
+                       columns = 3),
+       strip = strip.custom(strip.names = TRUE,
+                            var.name = "Época",
+                            sep = " : "),
+       xlab = "Nitrogênio",
+       ylab = expression("Produção de grãos de arroz"~(kg~ha^{-1})))
+
+}
+\keyword{FAT3}
+
diff --git a/man/ZimmermannTb9.22.Rd b/man/ZimmermannTb9.22.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..0c855f50e42e2f6143a614efe179bf24278ade11
--- /dev/null
+++ b/man/ZimmermannTb9.22.Rd
@@ -0,0 +1,71 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb9.22.R
+\name{ZimmermannTb9.22}
+\alias{ZimmermannTb9.22}
+\title{Fungicidas e Polímero na Infecção de \emph{Fusarium} em
+    Sementes}
+\format{Um \code{data.frame} com 55 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{trat}}{Fator cetegórico que identifica as celas
+    experimentais do fatorial com tratamentos adicionais.}
+
+\item{\code{fung}}{Fator categórico que identifica os níveis dos
+    fungicidas aplicados às sementes. Benlate, Captam e Derosal são
+    os fungicidas. O polímero puro e uma testemunha também foram
+    investigados.}
+
+\item{\code{aplic}}{Fator categórico que indica a forma de aplicação
+    do fungicida em relação ao polímero: antes do polímero, misturado
+    com o polímero ou o fungicída puro.}
+
+\item{\code{nsi}}{Número de sementes infectadas por \emph{fusarium}
+    de um total de 40 sementes.}
+
+}}
+\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. (Tabela 9.22, pág. 188)
+}
+\description{
+Resultados de um experimento fatorial com tratamentos
+    adicionais \eqn{3 \times 3 + 2} que estudou o número de sementes
+    infectadas por fusaruim em função aplicação de fungicidas às
+    sementes e do uso associado de um polímero depois do fungicida ou
+    misturado a ele. Os dois tratamentos adicionais era a aplicação
+    isolada do polímero e uma testemunha sem qualquer tratamento. O
+    experimento foi instalado em delineamento inteiramente
+    casualizado.
+}
+\examples{
+
+library(lattice)
+
+data(ZimmermannTb9.22)
+str(ZimmermannTb9.22)
+
+xtabs(~fung + aplic, ZimmermannTb9.22)
+
+xyplot(nsi/40 ~ trat, data = ZimmermannTb9.22,
+       xlab = "Tratamentos",
+       ylab = "Proporção de sementes infectadas",
+       scales = list(x = list(rot = 90)))
+
+# Gráfico da função arco seno da raíz.
+curve(asin(sqrt(x)), from = 0, to = 1)
+
+# Transformação arco seno da raíz quadrada da proporção.
+asin(sqrt(ZimmermannTb9.22$nsi/40))
+
+# A transformação não elimina os zeros.
+xyplot(asin(sqrt(nsi/40)) ~ trat, data = ZimmermannTb9.22,
+       xlab = "Tratamentos",
+       ylab = "Arco seno da raíz da proporção",
+       scales = list(x = list(rot = 90)))
+
+}
+\keyword{DIC}
+\keyword{binomial}
+
diff --git a/man/ZimmermannTb9.26.Rd b/man/ZimmermannTb9.26.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..4e7cab5c6b723ff8e04dfe4bdc9a72a949e9080c
--- /dev/null
+++ b/man/ZimmermannTb9.26.Rd
@@ -0,0 +1,56 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/ZimmermannTb9.26.R
+\name{ZimmermannTb9.26}
+\alias{ZimmermannTb9.26}
+\title{Época de Aplicação de NK na Altura de Plantas}
+\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que
+
+\describe{
+
+\item{\code{epoc}}{Fator categórico que representa a época de
+    aplicação dos nutrientes.}
+
+\item{\code{pota}}{Fator categórico que representa a dose de potássio
+    aplicada.}
+
+\item{\code{nitr}}{Fator categórico que representa a dose de
+    nitrogênio aplicada.}
+
+\item{\code{alt}}{Altura das plantas (cm).}
+
+}}
+\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. (Tabela 9.26, pág. 190)
+}
+\description{
+Dados de um estudo em fatorial \eqn{3^3}, sobre adubação
+    nitrogenada e potássica e suas épocas de aplicação. Os dados são
+    referentes a altura de plantas no cultivo da soca de arroz
+    irrigado. Dados referen-se apenas aos valores do primeiro
+    bloco. Veja \code{\link{ZimmermannTb9.17}}.
+}
+\examples{
+
+library(lattice)
+library(latticeExtra)
+
+data(ZimmermannTb9.26)
+str(ZimmermannTb9.26)
+
+ftable(xtabs(~epoc + nitr + pota, data = ZimmermannTb9.26))
+
+useOuterStrips(xyplot(alt ~ nitr + pota | epoc, outer = TRUE,
+                      data = ZimmermannTb9.26,
+                      type = c("p", "a"),
+                      xlab = "Níveis de nitrogênio/potássio",
+                      ylab = "Altura das plantas (cm)"),
+               strip = strip.custom(
+                   strip.name = TRUE, var.name = "Época"),
+               strip.left = strip.custom(
+                   factor.levels = c("Nitrogênio", "Potássio")))
+
+}
+\keyword{FAT3}
+