diff --git a/R/ZimmermannTb12.13.R b/R/ZimmermannTb12.13.R
index 26fecb24ad272b57995c7c7e455c12888beb5134..5571ffe1f01028c73811b2e212b99848966d823e 100644
--- a/R/ZimmermannTb12.13.R
+++ b/R/ZimmermannTb12.13.R
@@ -1,11 +1,11 @@
 #' @name ZimmermannTb12.13
 #' @title Dados da proporção de insetos infectados
-#' @description Dados do ensaio 1 de um experimento em DBC que estudou a 
-#'              patogenicidade de fungos as percevejo do grão de 
-#'              arroz. A testemunha sem infecção (1) era o tratamento
-#'              comum entre os dois experimentos. Os dados se referem 
-#'              à proporção de percevejos infectados e transformados
-#'              por arcoseno da raiz quadrada da proporção. 
+#' @description Dados do ensaio 1 de um experimento em DBC que estudou a
+#'     patogenicidade de fungos as percevejo do grão de arroz. A
+#'     testemunha sem infecção (1) era o tratamento comum entre os dois
+#'     experimentos. Os dados se referem à proporção de percevejos
+#'     infectados e transformados por arcoseno da raiz quadrada da
+#'     proporção.
 #' @format Um \code{data.frame} com 35 observações e 3 variáveis
 #'
 #' \describe{
@@ -17,21 +17,21 @@
 #' \item{prod}{Proporção de insetos infectados.}
 #'
 #' }
-#' @keywords DBC insetos percevejos arroz 
-#' @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 255)
+#' @keywords DBC proporçã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. (pg 255)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.13)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.13, 
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.13,
 #'        type=c("p","a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Proporção de insetos infectados")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.13, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.13,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb12.14.R b/R/ZimmermannTb12.14.R
index cf2f85076746a7eaf09c2543171d0e5d12283413..66861ed74956df1c6765ccea8ed77816d98ac86d 100644
--- a/R/ZimmermannTb12.14.R
+++ b/R/ZimmermannTb12.14.R
@@ -1,11 +1,11 @@
 #' @name ZimmermannTb12.14
 #' @title Dados da proporção de insetos infectados
-#' @description Dados do ensaio 2 de um experimento em DBC que estudou a 
-#'              patogenicidade de fungos as percevejo do grão de 
-#'              arroz. A testemunha sem infecção (1) era o tratamento
-#'              comum entre os dois experimentos. Os dados se referem 
-#'              à proporção de percevejos infectados e transformados
-#'              por arcoseno da raiz quadrada da proporção. 
+#' @description Dados do ensaio 2 de um experimento em DBC que estudou a
+#'     patogenicidade de fungos as percevejo do grão de arroz. A
+#'     testemunha sem infecção (1) era o tratamento comum entre os dois
+#'     experimentos. Os dados se referem à proporção de percevejos
+#'     infectados e transformados por arcoseno da raiz quadrada da
+#'     proporção.
 #' @format Um \code{data.frame} com 30 observações e 3 variáveis
 #'
 #' \describe{
@@ -17,21 +17,21 @@
 #' \item{prod}{Proporção de insetos infectados.}
 #'
 #' }
-#' @keywords DBC insetos percevejos arroz 
-#' @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 255)
+#' @keywords DBC proporçã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. (pg 255)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.14)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.14, 
-#'        type=c("p","a"),
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.14,
+#'        type = c("p", "a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Proporção de insetos infectados")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.14, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.14,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb12.19.R b/R/ZimmermannTb12.19.R
index b35a3fce0512794ae31e309d1ace0d57d2e4527b..dbfcad0cc892536af0afb41b1c1e8f70c80b8b99 100644
--- a/R/ZimmermannTb12.19.R
+++ b/R/ZimmermannTb12.19.R
@@ -1,12 +1,11 @@
 #' @name ZimmermannTb12.19
 #' @title Dados de produtividade de grãos de feijão
 #' @description Dados do ensaio 1 de um experimento em DBC de competição
-#'              de cultivares de feijão do grupo preto. Este ensaio foi 
-#'              realizado no município de Senador Canedo (GO). Houveram 
-#'              três cultivares testemunhas e mais seis em cada ensaio.
-#'              Cada experimento foi conduzido no período de inverno, sob
-#'              irrigação por aspersão. Os dados são relativos à 
-#'              produtividade de grãos, em kg/ha. 
+#'     de cultivares de feijão do grupo preto. Este ensaio foi realizado
+#'     no município de Senador Canedo (GO). Houveram três cultivares
+#'     testemunhas e mais seis em cada ensaio.  Cada experimento foi
+#'     conduzido no período de inverno, sob irrigação por aspersão. Os
+#'     dados são relativos à produtividade de grãos, em kg/ha.
 #' @format Um \code{data.frame} com 36 observações e 3 variáveis
 #'
 #' \describe{
@@ -18,21 +17,21 @@
 #' \item{prod}{Produtividade de grãos.}
 #'
 #' }
-#' @keywords DBC feijão plantas grãos produtividade
-#' @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 258)
+#' @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. (pg 258)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.19)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.19, 
-#'        type=c("p","a"),
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.19,
+#'        type = c("p", "a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Produtividade de grãos")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.19, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.19,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb12.20.R b/R/ZimmermannTb12.20.R
index 038d28358eda8de3e5ab0d5573bb99efba4ee801..ab4e4e28ddac8e6f5a33ef7251eb4aa4f26f7fe9 100644
--- a/R/ZimmermannTb12.20.R
+++ b/R/ZimmermannTb12.20.R
@@ -1,38 +1,39 @@
 #' @name ZimmermannTb12.20
 #' @title Dados de produtividade de grãos de feijão
 #' @description Dados do ensaio 2 de um experimento em DBC de competição
-#'              de cultivares de feijão do grupo preto. Este ensaio foi 
-#'              realizado no município de Santo Antonio de Goiás (GO). Houveram 
-#'              três cultivares testemunhas e mais seis em cada ensaio.
-#'              Cada experimento foi conduzido no período de inverno, sob
-#'              irrigação por aspersão. Os dados são relativos à 
-#'              produtividade de grãos, em kg/ha. 
+#'     de cultivares de feijão do grupo preto. Este ensaio foi realizado
+#'     no município de Santo Antonio de Goiás (GO). Houveram três
+#'     cultivares testemunhas e mais seis em cada ensaio.  Cada
+#'     experimento foi conduzido no período de inverno, sob irrigação
+#'     por aspersão. Os dados são relativos à produtividade de grãos, em
+#'     kg/ha.
 #' @format Um \code{data.frame} com 36 observações e 3 variáveis
 #'
 #' \describe{
 #'
-#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.}
+#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em
+#'     plantas.}
 #'
 #' \item{bloco}{Número inteiro que identifica o bloco da observação.}
 #'
 #' \item{prod}{Produtividade de grãos.}
 #'
 #' }
-#' @keywords DBC feijão plantas grãos produtividade
-#' @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 258)
+#' @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. (pg 258)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.20)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.20, 
-#'        type=c("p","a"),
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.20,
+#'        type = c("p", "a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Produtividade de grãos")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.20, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.20,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb12.7.R b/R/ZimmermannTb12.7.R
index d455f87003ebbdd3d72ee222669d87991818e113..a3ede2caa1ee14725fe4e02ace784d5e726348cb 100644
--- a/R/ZimmermannTb12.7.R
+++ b/R/ZimmermannTb12.7.R
@@ -1,38 +1,38 @@
 #' @name ZimmermannTb12.7
 #' @title Dados de área sob a curva do progresso de uma doença
-#' @description Dados de um ensaio que avaliou as cultivares para a área 
-#'              foliar atacada por brusone (Pyricularia Orizae L.) em 
-#'              diferentes datas e se calculou área sob a curva do progresso 
-#'              da doença. Este primeiro experimento foi semeado na densidade
-#'              de oitenta sementes por metro. Os dados foram transformados por
-#'              logaritmo natural, procurando-se uma maior homogeneização 
-#'              das variâncias.  
+#' @description Dados de um ensaio que avaliou as cultivares para a área
+#'     foliar atacada por brusone (Pyricularia Orizae L.) em diferentes
+#'     datas e se calculou área sob a curva do progresso da doença. Este
+#'     primeiro experimento foi semeado na densidade de oitenta sementes
+#'     por metro. Os dados foram transformados por logaritmo natural,
+#'     procurando-se uma maior homogeneização das variâncias.
 #' @format Um \code{data.frame} com 18 observações e 3 variáveis
 #'
 #' \describe{
 #'
-#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.}
+#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em
+#'     plantas.}
 #'
 #' \item{bloco}{Número inteiro que identifica o bloco da observação.}
 #'
 #' \item{prod}{Área sob a curva do progresso de uma doença.}
 #'
 #' }
-#' @keywords DBC área foliar plantas doença
-#' @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 251)
+#' @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. (pg 251)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.7)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.7, 
-#'        type=c("p","a"),
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.7,
+#'        type = c("p", "a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Área sob a curva do progresso da doença")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.7, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.7,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb12.8.R b/R/ZimmermannTb12.8.R
index 01b28f625c146c2fcee9d0e9c4a71fa52b6143b3..fe136b65fb929c07f73875afc71deb0f94291cb2 100644
--- a/R/ZimmermannTb12.8.R
+++ b/R/ZimmermannTb12.8.R
@@ -1,38 +1,38 @@
 #' @name ZimmermannTb12.8
 #' @title Dados de área sob a curva do progresso de uma doença
-#' @description Dados de um ensaio que avaliou as cultivares para a área 
-#'              foliar atacada por brusone (Pyricularia Orizae L.) em 
-#'              diferentes datas e se calculou área sob a curva do progresso 
-#'              da doença. Este primeiro experimento foi semeado na densidade
-#'              de duzentas sementes por metro. Os dados foram transformados por
-#'              logaritmo natural, procurando-se uma maior homogeneização 
-#'              das variâncias.  
+#' @description Dados de um ensaio que avaliou as cultivares para a área
+#'     foliar atacada por brusone (Pyricularia Orizae L.) em diferentes
+#'     datas e se calculou área sob a curva do progresso da doença. Este
+#'     primeiro experimento foi semeado na densidade de duzentas
+#'     sementes por metro. Os dados foram transformados por logaritmo
+#'     natural, procurando-se uma maior homogeneização das variâncias.
 #' @format Um \code{data.frame} com 18 observações e 3 variáveis
 #'
 #' \describe{
 #'
-#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.}
+#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em
+#'     plantas.}
 #'
 #' \item{bloco}{Número inteiro que identifica o bloco da observação.}
 #'
 #' \item{prod}{Área sob a curva do progresso de uma doença.}
 #'
 #' }
-#' @keywords DBC área foliar plantas doença
-#' @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 252)
+#' @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. (pg 252)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb12.8)
-#' 
-#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.8, 
-#'        type=c("p","a"),
+#'
+#' xyplot(prod ~ trat , groups = bloco, data = ZimmermannTb12.8,
+#'        type = c("p","a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Área sob a curva do progresso da doença")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb12.8, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb12.8,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb4.11.R b/R/ZimmermannTb4.11.R
index 54c7eacbda6b949978a08892f1074ebfae484545..340d647d6196c479f2176893454a8f2b6c7ab8c7 100644
--- a/R/ZimmermannTb4.11.R
+++ b/R/ZimmermannTb4.11.R
@@ -1,15 +1,16 @@
 #' @name ZimmermannTb4.11
 #' @title Estudo sobre alturas médias de perfilhos
-#' @description Dados de um ensaio com dez tratamentos, quatro blocos e 
-#'              cinco amostras tomadas ao acaso, de alturas médias de 
-#'              perfilhos em plantas, medidos em cm.  
+#' @description Dados de um ensaio com dez tratamentos, quatro blocos e
+#'     cinco amostras tomadas ao acaso, de alturas médias de perfilhos
+#'     em plantas, medidos em cm.
 #' @format Um \code{data.frame} com 200 observações e 4 variáveis
 #'
 #' \describe{
 #'
-#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em plantas.}
+#' \item{trat}{Fator de níveis nominais. Tratamento aplicado em
+#'     plantas.}
 #'
-#' \item{amostra}{Fator de níveis numéricos. Identifica à qual amostra 
+#' \item{amostra}{Fator de níveis numéricos. Identifica à qual amostra
 #'                pertence a observação.}
 #'
 #' \item{bloco}{Número inteiro que identifica o bloco da observação.}
@@ -17,24 +18,25 @@
 #' \item{prod}{Altura média de perfilhos.}
 #'
 #' }
-#' @keywords DBC perfilhos plantas altura
-#' @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 79)
+#' @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. (pg 79)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb4.11)
-#' 
-#' levelplot(prod~amostra+bloco,
-#'           data=ZimmermannTb4.11, aspect="iso")
-#' 
-#' xyplot(prod ~ trat | amostra, groups = bloco, data = ZimmermannTb4.11,
-#'        type=c("p","a"),
+#'
+#' levelplot(prod ~ amostra + bloco,
+#'           data = ZimmermannTb4.11, aspect = "iso")
+#'
+#' xyplot(prod ~ trat | amostra, groups = bloco,
+#'        data = ZimmermannTb4.11,
+#'        type = c("p", "a"),
 #'        xlab = "Tratamentos",
 #'        ylab = "Altura média de perfilhos")
-#' 
-#' aggregate(prod ~ trat, data = ZimmermannTb4.11, 
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb4.11,
 #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+NULL
diff --git a/R/ZimmermannTb4.4.R b/R/ZimmermannTb4.4.R
index 42a900fc896e2d1668e860cf764bfd060b9ff8d1..8ed3e590c9dabe6be688945ad2d4a9538753cebc 100644
--- a/R/ZimmermannTb4.4.R
+++ b/R/ZimmermannTb4.4.R
@@ -1,9 +1,9 @@
 #' @name ZimmermannTb4.4
 #' @title Estudo sobre produtividade de grãos de feijão
-#' @description Dados de um ensaio de competição de cultivares, em blocos
-#'              completos ao acaso, da produção de grãos de feijão em kg/ha.
-#'              O experimento teve quinze tratamentos (cultivares e/ou 
-#'              linhagens) e quatro blocos
+#' @description Dados de um ensaio de competição de cultivares, em
+#'     blocos completos ao acaso, da produção de grãos de feijão em
+#'     kg/ha.  O experimento teve quinze tratamentos (cultivares e/ou
+#'     linhagens) e quatro blocos.
 #' @format Um \code{data.frame} com 60 observações e 3 variáveis
 #'
 #' \describe{
@@ -15,20 +15,21 @@
 #' \item{prod}{Produção de grãos de feijão.}
 #'
 #' }
-#' @keywords DBC feijao cultivares 
-#' @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 72)
+#' @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. (pg 72)
 #' @examples
 #'
 #' library(lattice)
 #'
 #' data(ZimmermannTb4.4)
-#' 
-#' xyplot(prod ~ trat, data= ZimmermannTb4.4, type="o", jitter.x=TRUE, 
-#'       groups = bloco, xlab="Tratamento", ylab="Produção de feijão", 
-#'       main="Experimento de competição de cultivares")
-#'
-#' aggregate(prod ~ trat, data = ZimmermannTb4.4, 
-#'          FUN = function(x) { c(mean = mean(x), var = var(x)) })
-NULL
\ No newline at end of file
+#'
+#' xyplot(prod ~ trat, data = ZimmermannTb4.4,
+#'        type = "o", jitter.x = TRUE, groups = bloco,
+#'        xlab = "Tratamento", ylab = "Produção de feijão",
+#'        main = "Experimento de competição de cultivares")
+#'
+#' aggregate(prod ~ trat, data = ZimmermannTb4.4,
+#'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
+NULL