diff --git a/R/AndradeEx8.17.R b/R/AndradeEx8.17.R
new file mode 100644
index 0000000000000000000000000000000000000000..61750419b0b2d1ab74c9ef7bf9d60106ebc35e4c
--- /dev/null
+++ b/R/AndradeEx8.17.R
@@ -0,0 +1,39 @@
+#' @name AndradeEx8.17
+#' @title Comportamento da espécie \emph{Mandevilla velutina}
+#' @description Experimento para avaliar o comportamento \emph{in vitro}
+#'     da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente
+#'     de duas regiões: cerrado e restinga. Após isolar os explantes,
+#'     com um nó com duas gemas axilares, obtidos das plantas matrizes,
+#'     foi instalado o experimento com delineamento inteiramente
+#'     casualizado com 20 repetições (20 explantes para o cerrado de 20
+#'     para a restinga); portanto, temos um total de 40 unidades
+#'     experimentais. A variável utilizada foi a altura em cm dos
+#'     explantes de \emph{Mandevilla} cultivadas \emph{in vitro} durante
+#'     45 dias.
+#' @format Um \code{data.frame} com 40 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{regiao}}{Fator de 2 níveis qualitativos, que indica a
+#'     região da plantação.}
+#'
+#' \item{\code{altura}}{Altura em cm dos explantes de \emph{Mandevilla}
+#'     cultivadas \emph{in vitro} durante 45 dias.}
+#'
+#' }
+#' @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
+#'     17, pág. 412)
+#' @examples
+#'
+#' data(AndradeEx8.17)
+#' str(AndradeEx8.17)
+#'
+#' boxplot(altura ~ regiao,
+#'         data = AndradeEx8.17,
+#'         xlab = "Região",
+#'         ylab = "Altura (cm)")
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/AndradeEx8.17.txt b/data-raw/AndradeEx8.17.txt
new file mode 100644
index 0000000000000000000000000000000000000000..216943c511f7932e63e18ec90d0ab62745d66a8d
--- /dev/null
+++ b/data-raw/AndradeEx8.17.txt
@@ -0,0 +1,41 @@
+regiao	altura
+Cerrado	5.3
+Cerrado	2.5
+Cerrado	5.1
+Cerrado	2.6
+Cerrado	1.2
+Cerrado	3.1
+Cerrado	4.1
+Cerrado	3.7
+Cerrado	5
+Cerrado	1.6
+Cerrado	3
+Cerrado	4.7
+Cerrado	2.6
+Cerrado	4.2
+Cerrado	4
+Cerrado	4.7
+Cerrado	6.4
+Cerrado	2.9
+Cerrado	3.2
+Cerrado	2.1
+Restinga	3.6
+Restinga	2.3
+Restinga	6
+Restinga	2.1
+Restinga	5.2
+Restinga	4.3
+Restinga	3.9
+Restinga	2.1
+Restinga	2.4
+Restinga	2
+Restinga	2.7
+Restinga	3.9
+Restinga	5.6
+Restinga	4.7
+Restinga	1.9
+Restinga	5.1
+Restinga	4.7
+Restinga	2.1
+Restinga	6.1
+Restinga	8.1
diff --git a/data/AndradeEx8.17.rda b/data/AndradeEx8.17.rda
new file mode 100644
index 0000000000000000000000000000000000000000..fbebb4b12f4ad996c0bb1b4c3eb5c287d3328f49
Binary files /dev/null and b/data/AndradeEx8.17.rda differ
diff --git a/man/AndradeEx8.17.Rd b/man/AndradeEx8.17.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..1a1bb3f432f9812e03293e3f99610db84e94faaa
--- /dev/null
+++ b/man/AndradeEx8.17.Rd
@@ -0,0 +1,47 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx8.17.R
+\name{AndradeEx8.17}
+\alias{AndradeEx8.17}
+\title{Comportamento da espécie \emph{Mandevilla velutina}}
+\format{Um \code{data.frame} com 40 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{regiao}}{Fator de 2 níveis qualitativos, que indica a
+    região da plantação.}
+
+\item{\code{altura}}{Altura em cm dos explantes de \emph{Mandevilla}
+    cultivadas \emph{in vitro} durante 45 dias.}
+
+}}
+\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
+    17, pág. 412)
+}
+\description{
+Experimento para avaliar o comportamento \emph{in vitro}
+    da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente
+    de duas regiões: cerrado e restinga. Após isolar os explantes,
+    com um nó com duas gemas axilares, obtidos das plantas matrizes,
+    foi instalado o experimento com delineamento inteiramente
+    casualizado com 20 repetições (20 explantes para o cerrado de 20
+    para a restinga); portanto, temos um total de 40 unidades
+    experimentais. A variável utilizada foi a altura em cm dos
+    explantes de \emph{Mandevilla} cultivadas \emph{in vitro} durante
+    45 dias.
+}
+\examples{
+
+data(AndradeEx8.17)
+str(AndradeEx8.17)
+
+boxplot(altura ~ regiao,
+        data = AndradeEx8.17,
+        xlab = "Região",
+        ylab = "Altura (cm)")
+
+}
+\keyword{AAS}
+