diff --git a/.RData b/.RData
index a738aa0b43c8259e18141b255e89faf2838ff466..da3acb41cb03e989ff18650a75e3859e9c701cb3 100644
Binary files a/.RData and b/.RData differ
diff --git a/R/AndradeTb2.18.R b/R/AndradeTb2.18.R
new file mode 100644
index 0000000000000000000000000000000000000000..6419156b91b8d0f8809bfd3ebbf62304c948951a
--- /dev/null
+++ b/R/AndradeTb2.18.R
@@ -0,0 +1,29 @@
+#' @name AndradeTb2.18
+#' @title Rendimento Médio de Híbridos de Milho
+#' @description Rendimentos médios, em \eqn{kg.ha^{-1}}, de 32 híbridos
+#'     de milho recomendados para a Região Oeste catarinense.
+#' @format Um \code{vetor} numérico com 32 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. (Tabela
+#'     2.18, pág. 97)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(AndradeTb2.18)
+#' str(AndradeTb2.18)
+#'
+#' hist(AndradeTb2.18,
+#'      col = "darkturquoise",
+#'      labels = TRUE,
+#'      main = "",
+#'      ylim = c(0, 1),
+#'      prob = TRUE,
+#'      xlab = "Rendimento Médio (em kg/ha)",
+#'      ylab = "Densidade")
+#'
+#' lines(density(AndradeTb2.18), lwd = 2)
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/.~lock.AndradeTb2.17.csv# b/data-raw/.~lock.AndradeTb2.17.csv#
deleted file mode 100644
index 1918d46e90822e5658a74386afe39905d5005753..0000000000000000000000000000000000000000
--- a/data-raw/.~lock.AndradeTb2.17.csv#
+++ /dev/null
@@ -1 +0,0 @@
-,pet-estatistica2,petestatistica2-G31M-ES2C,02.09.2016 15:21,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/AndradeTb2.18.txt b/data-raw/AndradeTb2.18.txt
new file mode 100644
index 0000000000000000000000000000000000000000..314a4c0ebecaf79ac46ed83d6431bb45e700633c
--- /dev/null
+++ b/data-raw/AndradeTb2.18.txt
@@ -0,0 +1,32 @@
+3.973
+4.5
+4.55
+4.552
+4.614
+4.66
+4.68
+4.685
+4.76
+4.769
+4.77
+4.778
+4.849
+4.96
+4.975
+4.98
+4.993
+5.056
+5.063
+5.11
+5.117
+5.166
+5.172
+5.202
+5.230
+5.403
+5.513
+5.823
+5.889
+6.047
+6.166
+6.388
diff --git a/data/AndradeTb2.18.rda b/data/AndradeTb2.18.rda
new file mode 100644
index 0000000000000000000000000000000000000000..794f73f323a0ad5c3eb22c9209f7d3b78bf4585e
Binary files /dev/null and b/data/AndradeTb2.18.rda differ
diff --git a/man/AndradeTb2.18.Rd b/man/AndradeTb2.18.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..c57508dbba5db108033c6091f341df69a0a96795
--- /dev/null
+++ b/man/AndradeTb2.18.Rd
@@ -0,0 +1,37 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb2.18.R
+\name{AndradeTb2.18}
+\alias{AndradeTb2.18}
+\title{Rendimento Médio de Híbridos de Milho}
+\format{Um \code{vetor} numérico com 32 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. (Tabela
+    2.18, pág. 97)
+}
+\description{
+Rendimentos médios, em \eqn{kg.ha^{-1}}, de 32 híbridos
+    de milho recomendados para a Região Oeste catarinense.
+}
+\examples{
+
+library(lattice)
+
+data(AndradeTb2.18)
+str(AndradeTb2.18)
+
+hist(AndradeTb2.18,
+     col = "darkturquoise",
+     labels = TRUE,
+     main = "",
+     ylim = c(0, 1),
+     prob = TRUE,
+     xlab = "Rendimento Médio (em kg/ha)",
+     ylab = "Densidade")
+
+lines(density(AndradeTb2.18), lwd = 2)
+
+}
+\keyword{AAS}
+