diff --git a/R/PimentelEx5.8.5.R b/R/PimentelEx5.8.5.R
new file mode 100644
index 0000000000000000000000000000000000000000..f4c349f0c041a678e1376aea600c916769edf237
--- /dev/null
+++ b/R/PimentelEx5.8.5.R
@@ -0,0 +1,34 @@
+#' @name PimentelEx5.8.5
+#' @title Competição de variedades de mandioca
+#' @description Experimento em blocos ao acaso, realizado pelo Instituto
+#'     de Pesquisas Agronômicas do Leste (atual Centro Nacional de
+#'     Pesquisa de Mandioca e Fruticultura da Embrapa), em Cruz das
+#'     Almas, BA, referente a produção em uma competição de variedades
+#'     de mandioca.
+#' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{bloco}}{Fator de 4 níveis qualitativos, usado para
+#'     controle local.}
+#'
+#' \item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os
+#'     diferentes tipos de mandioca.}
+#'     
+#' \item{\code{prod}}{Produção de mandioca, em t/ha.}
+#'
+#' }
+#' @keywords DBC
+#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
+#'     (15th ed.). Piracicaba, SP: FEALQ.
+#' @examples
+#'
+#' library(lattice)
+#'
+#' xyplot(prod ~ variedade,
+#'        groups = bloco,
+#'        data = PimentelEx5.8.5,
+#'        xlab = "Variedade",
+#'        ylab = "Produção")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/PimentelEx5.8.5.txt b/data-raw/PimentelEx5.8.5.txt
new file mode 100644
index 0000000000000000000000000000000000000000..1b0ad6aeaed168c97b0ff1626304ad2e5cf9e8e6
--- /dev/null
+++ b/data-raw/PimentelEx5.8.5.txt
@@ -0,0 +1,25 @@
+bloco	variedade	prod
+i	AipimBravo	14.5
+i	Milagrosa	5.7
+i	Sutinga	5.3
+i	SalangoPreta	4.6
+i	Mamao	14.8
+i	Escondida	8.2
+ii	AipimBravo	15.8
+ii	Milagrosa	5.9
+ii	Sutinga	7.7
+ii	SalangoPreta	7.1
+ii	Mamao	12.6
+ii	Escondida	8.2
+iii	AipimBravo	24.0
+iii	Milagrosa	10.5
+iii	Sutinga	10.2
+iii	SalangoPreta	10.4
+iii	Mamao	18.8
+iii	Escondida	12.7
+iv	AipimBravo	17.0
+iv	Milagrosa	6.6
+iv	Sutinga	9.6
+iv	SalangoPreta	10.8
+iv	Mamao	16.0
+iv	Escondida	17.5
diff --git a/data/PimentelEx5.8.5.rda b/data/PimentelEx5.8.5.rda
new file mode 100644
index 0000000000000000000000000000000000000000..6fb8c42918840da42d6b5339e5af5f8ee41780ab
Binary files /dev/null and b/data/PimentelEx5.8.5.rda differ
diff --git a/man/PimentelEx5.8.5.Rd b/man/PimentelEx5.8.5.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..a2b7fc00fdf9c2bdb9451c263b2d0488ba6ec3d4
--- /dev/null
+++ b/man/PimentelEx5.8.5.Rd
@@ -0,0 +1,42 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PimentelEx5.8.5.R
+\name{PimentelEx5.8.5}
+\alias{PimentelEx5.8.5}
+\title{Competição de variedades de mandioca}
+\format{Um \code{data.frame} com 24 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{bloco}}{Fator de 4 níveis qualitativos, usado para
+    controle local.}
+
+\item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os
+    diferentes tipos de mandioca.}
+    
+\item{\code{prod}}{Produção de mandioca, em t/ha.}
+
+}}
+\source{
+Pimentel-Gomes, F. (2009). Curso de Estatística Experimental
+    (15th ed.). Piracicaba, SP: FEALQ.
+}
+\description{
+Experimento em blocos ao acaso, realizado pelo Instituto
+    de Pesquisas Agronômicas do Leste (atual Centro Nacional de
+    Pesquisa de Mandioca e Fruticultura da Embrapa), em Cruz das
+    Almas, BA, referente a produção em uma competição de variedades
+    de mandioca.
+}
+\examples{
+
+library(lattice)
+
+xyplot(prod ~ variedade,
+       groups = bloco,
+       data = PimentelEx5.8.5,
+       xlab = "Variedade",
+       ylab = "Produção")
+
+}
+\keyword{DBC}
+