diff --git a/R/AndradeTb1.2.R b/R/AndradeTb1.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..68e1eccc1822ad9c2c9415d91b6c70024324e410
--- /dev/null
+++ b/R/AndradeTb1.2.R
@@ -0,0 +1,43 @@
+#' @name AndradeTb1.2
+#' @title Experimento de Produção de Milho em função do Nitrogênio
+#' @description Experimento que tem como objetivo verificar o
+#'     comportamento da produção de milho sob o efeito de diferentes
+#'     doses de nitrogênio. Para cada dose de nitrogênio foram plantados
+#'     cinco canteiros de terra de \eqn{10m^{2}} cada. Portanto o
+#'     tamanho da amostra para cada dose de nitrogênio é cinco.
+#' @format Um \code{data.frame} com 25 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{trat}}{Fator de 5 níveis qualitativos que são as dosagens
+#'     de Nitrogênio, em \eqn{kg.ha^{-1}}.}
+#'
+#' \item{\code{rept}}{Fator de 5 níveis qualitativos que são as
+#'     repetições do experimento.}
+#'
+#' \item{\code{prod}}{Produção de milho, em \eqn{kg.ha^{-1}}.}
+#'
+#' }
+#' @keywords DBC
+#' @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
+#'     1.1, pág. 37)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(AndradeTb1.2)
+#' str(AndradeTb1.2)
+#'
+#' xyplot(prod ~ trat,
+#'        groups = rept,
+#'        data = AndradeTb1.2,
+#'        type = c("p", "a"),
+#'        auto.key = list(title = "Repetições",
+#'                        cex.title = 1.1,
+#'                        columns = 5),
+#'        xlab = "Dosagem de Nitrogênio (em kg/ha)",
+#'        ylab = "Produção de Milho (em kg/ha)")
+#'
+NULL
\ No newline at end of file
diff --git "a/data-raw/.~lock.Sem t\303\255tulo 1.csv#" "b/data-raw/.~lock.Sem t\303\255tulo 1.csv#"
new file mode 100644
index 0000000000000000000000000000000000000000..38be0b9ba71e9c3226f530b68aa71c3801dd3a86
--- /dev/null
+++ "b/data-raw/.~lock.Sem t\303\255tulo 1.csv#"	
@@ -0,0 +1 @@
+,pet-estatistica2,petestatistica2-G31M-ES2C,26.08.2016 15:40,file:///home/pet-estatistica2/.config/libreoffice/4;
\ No newline at end of file
diff --git a/data-raw/AndradeTb1.2.txt b/data-raw/AndradeTb1.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..98b76059ef7ab94b0d562aa4606f7abc8fe3152e
--- /dev/null
+++ b/data-raw/AndradeTb1.2.txt
@@ -0,0 +1,26 @@
+trat	rept	prod
+0	1	2.85
+25	1	3.2
+50	1	4.15
+75	1	4.38
+100	1	4
+0	2	1.78
+25	2	1.98
+50	2	2.33
+75	2	2.83
+100	2	2.63
+0	3	2.1
+25	3	2.22
+50	3	3.7
+75	3	3.42
+100	3	3.15
+0	4	2.9
+25	4	2.85
+50	4	4.05
+75	4	3.9
+100	4	3.78
+0	5	2.01
+25	5	2.1
+50	5	2.5
+75	5	3.08
+100	5	2.67
diff --git a/data/AndradeTb1.2.rda b/data/AndradeTb1.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..d9f26214ed557ed646f907b50e3b614b8bacdc8b
Binary files /dev/null and b/data/AndradeTb1.2.rda differ
diff --git a/man/AndradeTb1.2.Rd b/man/AndradeTb1.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..1d34de8093a6fe5b075905cf672346b6120bdf77
--- /dev/null
+++ b/man/AndradeTb1.2.Rd
@@ -0,0 +1,51 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/AndradeTb1.2.R
+\name{AndradeTb1.2}
+\alias{AndradeTb1.2}
+\title{Experimento de Produção de Milho em função do Nitrogênio}
+\format{Um \code{data.frame} com 25 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{trat}}{Fator de 5 níveis qualitativos que são as dosagens
+    de Nitrogênio, em \eqn{kg.ha^{-1}}.}
+
+\item{\code{rept}}{Fator de 5 níveis qualitativos que são as
+    repetições do experimento.}
+
+\item{\code{prod}}{Produção de milho, em \eqn{kg.ha^{-1}}.}
+
+}}
+\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
+    1.1, pág. 37)
+}
+\description{
+Experimento que tem como objetivo verificar o
+    comportamento da produção de milho sob o efeito de diferentes
+    doses de nitrogênio. Para cada dose de nitrogênio foram plantados
+    cinco canteiros de terra de \eqn{10m^{2}} cada. Portanto o
+    tamanho da amostra para cada dose de nitrogênio é cinco.
+}
+\examples{
+
+library(lattice)
+
+data(AndradeTb1.2)
+str(AndradeTb1.2)
+
+xyplot(prod ~ trat,
+       groups = rept,
+       data = AndradeTb1.2,
+       type = c("p", "a"),
+       auto.key = list(title = "Repetições",
+                       cex.title = 1.1,
+                       columns = 5),
+       xlab = "Dosagem de Nitrogênio (em kg/ha)",
+       ylab = "Produção de Milho (em kg/ha)")
+
+}
+\keyword{DBC}
+