diff --git a/R/AndradeEx8.13.R b/R/AndradeEx8.13.R
new file mode 100644
index 0000000000000000000000000000000000000000..2b43db25afd38ec32b1d66d58bc77ebe0055203a
--- /dev/null
+++ b/R/AndradeEx8.13.R
@@ -0,0 +1,34 @@
+#' @name AndradeEx8.13
+#' @title Estudo do Desenvolvimento das Espécies Bracatinga e
+#'     Canafístula
+#' @description Estudo, realizado por um agrônomo, sobre o
+#'     desenvolvimento de duas espécies de árvores, a Bracatinga (
+#'     \emph{Mimosa scabrella} e a Canafístula \emph{Peltophorum
+#'     dubium}. Para essa finalidade foram coletadas duas amostras de
+#'     tamanhos iguais a 30 árvores.
+#' @format Um \code{data.frame} com 60 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{arvores}}{Fator de 2 níveis qualitativos, que são as
+#'     espécies de árvores.}
+#'
+#' \item{\code{altura}}{Altura das árvores, em metros.}
+#'
+#' }
+#' @keywords AAS
+#' @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 8, Exercício
+#'     13, pág. 410)
+#' @examples
+#'
+#' data(AndradeEx8.13)
+#' str(AndradeEx8.13)
+#'
+#' boxplot(altura ~ arvores,
+#'         data = AndradeEx8.13,
+#'         xlab = "Árvore",
+#'         ylab = "Altura (m)")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx8.13.txt b/data-raw/AndradeEx8.13.txt
new file mode 100644
index 0000000000000000000000000000000000000000..00ce0e205d9c4874b46ff90e3633b1b72297a8a4
--- /dev/null
+++ b/data-raw/AndradeEx8.13.txt
@@ -0,0 +1,61 @@
+arvores	altura
+Bracatinga	6.4
+Bracatinga	6.8
+Bracatinga	6.9
+Bracatinga	6.9
+Bracatinga	6.9
+Bracatinga	7
+Bracatinga	8.3
+Bracatinga	8.6
+Bracatinga	8.7
+Bracatinga	8.7
+Bracatinga	9
+Bracatinga	9.1
+Bracatinga	9.3
+Bracatinga	9.9
+Bracatinga	10.1
+Bracatinga	10.2
+Bracatinga	11.4
+Bracatinga	13.7
+Bracatinga	14.8
+Bracatinga	15.2
+Bracatinga	16.1
+Bracatinga	16.3
+Bracatinga	17.2
+Bracatinga	18.4
+Bracatinga	20
+Bracatinga	20.1
+Bracatinga	20.3
+Bracatinga	21.4
+Bracatinga	22.8
+Bracatinga	22.8
+Canafistula	8.2
+Canafistula	9.7
+Canafistula	9.8
+Canafistula	10.1
+Canafistula	10.1
+Canafistula	10.1
+Canafistula	10.3
+Canafistula	11.2
+Canafistula	13.2
+Canafistula	13.4
+Canafistula	14.1
+Canafistula	14.2
+Canafistula	14.4
+Canafistula	14.8
+Canafistula	15.9
+Canafistula	20.2
+Canafistula	20.3
+Canafistula	20.6
+Canafistula	29.9
+Canafistula	23.8
+Canafistula	25.7
+Canafistula	30.9
+Canafistula	35.5
+Canafistula	38.2
+Canafistula	40
+Canafistula	40.1
+Canafistula	40.2
+Canafistula	40.5
+Canafistula	41.8
+Canafistula	42.3
diff --git a/data/AndradeEx8.13.rda b/data/AndradeEx8.13.rda
new file mode 100644
index 0000000000000000000000000000000000000000..89742da642132a7a0b28af9cf8fed7b65e17fd42
Binary files /dev/null and b/data/AndradeEx8.13.rda differ
diff --git a/man/AndradeEx8.13.Rd b/man/AndradeEx8.13.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..2ed2bdb502965dc22843ee7356a5fd917bd21395
--- /dev/null
+++ b/man/AndradeEx8.13.Rd
@@ -0,0 +1,42 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx8.13.R
+\name{AndradeEx8.13}
+\alias{AndradeEx8.13}
+\title{Estudo do Desenvolvimento das Espécies Bracatinga e
+    Canafístula}
+\format{Um \code{data.frame} com 60 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{arvores}}{Fator de 2 níveis qualitativos, que são as
+    espécies de á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 8, Exercício
+    13, pág. 410)
+}
+\description{
+Estudo, realizado por um agrônomo, sobre o
+    desenvolvimento de duas espécies de árvores, a Bracatinga (
+    \emph{Mimosa scabrella} e a Canafístula \emph{Peltophorum
+    dubium}. Para essa finalidade foram coletadas duas amostras de
+    tamanhos iguais a 30 árvores.
+}
+\examples{
+
+data(AndradeEx8.13)
+str(AndradeEx8.13)
+
+boxplot(altura ~ arvores,
+        data = AndradeEx8.13,
+        xlab = "Árvore",
+        ylab = "Altura (m)")
+
+}
+\keyword{AAS}
+