diff --git a/R/AndradeEx7.13.R b/R/AndradeEx7.13.R
new file mode 100644
index 0000000000000000000000000000000000000000..6bbf933411bd979977952c34772cb52e7479a6f6
--- /dev/null
+++ b/R/AndradeEx7.13.R
@@ -0,0 +1,33 @@
+#' @name AndradeEx7.13
+#' @title Estudo do Desenvolvimento de Duas Espécies de Árvores
+#' @description Estudo, realizado por um agrônomo, sobre o
+#'     desenvolvimento de duas espécies de árvores, a Bracatinga e a
+#'     Canafístula. Para essa finalidade foram coletadas duas amostras
+#'     de tamanhos iguais a 10 árvores.
+#' @format Um \code{data.frame} com 20 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{arvore}}{Fator de 2 níveis qualitativos, que são as
+#'     espécies das árvores.}
+#'
+#' \item{\code{altura}}{Altura das árvores, em metros.}
+#'
+#' }
+#' @keywords DBC
+#' @source Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+#'     ciências agrárias e biológicas com noções de experimentação (2nd
+#'     ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 7, Exercício
+#'     13, pág. 344)
+#' @examples
+#'
+#' data(AndradeEx7.13)
+#' str(AndradeEx7.13)
+#'
+#' library(lattice)
+#' dotplot(altura ~ arvore,
+#'         data = AndradeEx7.13,
+#'         xlab = "Espécie",
+#'         ylab = "Altura (m)")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx7.13.txt b/data-raw/AndradeEx7.13.txt
new file mode 100644
index 0000000000000000000000000000000000000000..10dc62b81806eb49d25888096fe0a8c48efe16fb
--- /dev/null
+++ b/data-raw/AndradeEx7.13.txt
@@ -0,0 +1,21 @@
+arvore	altura
+Bracatinga	6.5
+Bracatinga	6.9
+Bracatinga	6.9
+Bracatinga	8.6
+Bracatinga	8.7
+Bracatinga	9.3
+Bracatinga	10.1
+Bracatinga	11.4
+Bracatinga	15.2
+Bracatinga	17.2
+Canafistula	8.2
+Canafistula	10
+Canafistula	10.3
+Canafistula	13.4
+Canafistula	14.4
+Canafistula	14.8
+Canafistula	15.9
+Canafistula	20.6
+Canafistula	21.9
+Canafistula	23.8
diff --git a/data/AndradeEx7.13.rda b/data/AndradeEx7.13.rda
new file mode 100644
index 0000000000000000000000000000000000000000..dfcdacbd8afb91cc3e63069407d220a16a727cc4
Binary files /dev/null and b/data/AndradeEx7.13.rda differ
diff --git a/man/AndradeEx7.13.Rd b/man/AndradeEx7.13.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..84a7d5c3db9bed9e8adfe64a4801ed976f8ab39b
--- /dev/null
+++ b/man/AndradeEx7.13.Rd
@@ -0,0 +1,41 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx7.13.R
+\name{AndradeEx7.13}
+\alias{AndradeEx7.13}
+\title{Estudo do Desenvolvimento de Duas Espécies de Árvores}
+\format{Um \code{data.frame} com 20 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{arvore}}{Fator de 2 níveis qualitativos, que são as
+    espécies das árvores.}
+
+\item{\code{altura}}{Altura das árvores, em metros.}
+
+}}
+\source{
+Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
+    ciências agrárias e biológicas com noções de experimentação (2nd
+    ed.). Florianópolis, SC. Editora da UFSC. (Capítulo 7, Exercício
+    13, pág. 344)
+}
+\description{
+Estudo, realizado por um agrônomo, sobre o
+    desenvolvimento de duas espécies de árvores, a Bracatinga e a
+    Canafístula. Para essa finalidade foram coletadas duas amostras
+    de tamanhos iguais a 10 árvores.
+}
+\examples{
+
+data(AndradeEx7.13)
+str(AndradeEx7.13)
+
+library(lattice)
+dotplot(altura ~ arvore,
+        data = AndradeEx7.13,
+        xlab = "Espécie",
+        ylab = "Altura (m)")
+
+}
+\keyword{DBC}
+