diff --git a/R/AndradeEx2.13.R b/R/AndradeEx2.13.R
new file mode 100644
index 0000000000000000000000000000000000000000..1f451941e3504aaed5e6e5defd75f4d14567313d
--- /dev/null
+++ b/R/AndradeEx2.13.R
@@ -0,0 +1,30 @@
+#' @name AndradeEx2.13
+#' @title Estudo dos Ovos de \emph{Biomphalaria Taenagophila}
+#' @description Estudo do comportamento da variável número de ovos
+#'     inviáveis de \emph{Biomphalaria taenagophila} (caramujo) em
+#'     ambiente poluído. Para isso tomou-se uma amostra de 23 caramujos.
+#' @format Um \code{vetor} numérico com 23 observações.
+#' @keywords AAS
+#' @source Estatística para as ciências agrárias e biológicas: com
+#'     noções de experimentação / Dalton F. Andrade, Paulo J. Ogliari.
+#'     2. ed. rev. e ampl. - Florianópolis: Ed. da UFSC, 2010.
+#'     (Capítulo 2, Exercício 13, pág. 109)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(AndradeEx2.13)
+#' str(AndradeEx2.13)
+#'
+#' hist(AndradeEx2.13,
+#'      labels = TRUE,
+#'      prob = TRUE,
+#'      main = NULL,
+#'      col = "darkturquoise",
+#'      ylim = c(0, 0.12),
+#'      xlab = "Número de Ovos",
+#'      ylab = "Densidade")
+#'
+#' lines(density(AndradeEx2.13), lwd = 2)
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/.~lock.AndradeEx2.13.csv# b/data-raw/.~lock.AndradeEx2.13.csv#
new file mode 100644
index 0000000000000000000000000000000000000000..3afe14796dcffa74619058c797e5d153fe36588d
--- /dev/null
+++ b/data-raw/.~lock.AndradeEx2.13.csv#
@@ -0,0 +1 @@
+,pet-estatistica2,petestatistica2-G31M-ES2C,12.09.2016 17:07,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/.~lock.AndradeTb2.28.csv# b/data-raw/.~lock.AndradeTb2.28.csv#
deleted file mode 100644
index 1a68d08d51a2af7b22534dfe3a3493dbf2736273..0000000000000000000000000000000000000000
--- a/data-raw/.~lock.AndradeTb2.28.csv#
+++ /dev/null
@@ -1 +0,0 @@
-,pet-estatistica2,petestatistica2-G31M-ES2C,12.09.2016 16:31,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/AndradeEx2.13.txt b/data-raw/AndradeEx2.13.txt
new file mode 100644
index 0000000000000000000000000000000000000000..953dd74b0735673d4e8a38a2442cfb79afa6d461
--- /dev/null
+++ b/data-raw/AndradeEx2.13.txt
@@ -0,0 +1,23 @@
+9
+11
+10
+0
+4
+4
+5
+12
+4
+1
+2
+8
+4
+7
+1
+11
+10
+3
+14
+3
+2
+22
+4
diff --git a/data/AndradeEx2.13.rda b/data/AndradeEx2.13.rda
new file mode 100644
index 0000000000000000000000000000000000000000..a1efbca5b49e1156f403f9894615a91ac9da7fb2
Binary files /dev/null and b/data/AndradeEx2.13.rda differ
diff --git a/man/AndradeEx2.13.Rd b/man/AndradeEx2.13.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..b97462f1c6eed97122be946f82ecc895f1bac904
--- /dev/null
+++ b/man/AndradeEx2.13.Rd
@@ -0,0 +1,38 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeEx2.13.R
+\name{AndradeEx2.13}
+\alias{AndradeEx2.13}
+\title{Estudo dos Ovos de \emph{Biomphalaria Taenagophila}}
+\format{Um \code{vetor} numérico com 23 observações.}
+\source{
+Estatística para as ciências agrárias e biológicas: com
+    noções de experimentação / Dalton F. Andrade, Paulo J. Ogliari.
+    2. ed. rev. e ampl. - Florianópolis: Ed. da UFSC, 2010.
+    (Capítulo 2, Exercício 13, pág. 109)
+}
+\description{
+Estudo do comportamento da variável número de ovos
+    inviáveis de \emph{Biomphalaria taenagophila} (caramujo) em
+    ambiente poluído. Para isso tomou-se uma amostra de 23 caramujos.
+}
+\examples{
+
+library(lattice)
+
+data(AndradeEx2.13)
+str(AndradeEx2.13)
+
+hist(AndradeEx2.13,
+     labels = TRUE,
+     prob = TRUE,
+     main = NULL,
+     col = "darkturquoise",
+     ylim = c(0, 0.12),
+     xlab = "Número de Ovos",
+     ylab = "Densidade")
+
+lines(density(AndradeEx2.13), lwd = 2)
+
+}
+\keyword{AAS}
+