diff --git a/R/NetoTb2A.1.R b/R/NetoTb2A.1.R
new file mode 100644
index 0000000000000000000000000000000000000000..ef3aaf365b65b1dd6d0a2485fcd66be98bd04a8e
--- /dev/null
+++ b/R/NetoTb2A.1.R
@@ -0,0 +1,37 @@
+#' @name NetoTb2A.1
+#' @title De casa para o trabalho
+#' @description A tabela contém resultados de 32 ensaios em que foi
+#'    cronometrado o tempo transcorrido desde a passagem por uma ponte
+#'    até a chegada do pesquisador ao seu destino final.
+#' @format Um \code{data.frame} com 32 observações e 5 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{ens}}{Ensaio correspondente.}
+#'
+#' \item{\code{sai}}{Fator de 25 níveis qualitativos referente aos
+#'    horários de saída do pesquisador.}
+#'    
+#' \item{\code{dia}}{Fator de 5 níveis qualitativos referente aos dias
+#'    da semana em que o pesquisador realizou o percurso.}
+#'
+#' \item{\code{perc}}{Fator de 3 níveis referente ao percurso realizado
+#'    pelo pesquisador}
+#' 
+#' \item{\code{tem}}{Tempo de viagem, em minutos}
+#'
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Tabela 2A.1, pág. 86)
+#' @examples
+#'
+#' library(lattice)
+#'
+#' data(NetoTb2A.1)
+#' str(NetoTb2A.1)
+#'
+#' xyplot(tem ~ ens, xlab = "Ensaio", ylab = "Tempo",
+#'        main = "Tempos do Experimento na Ordem de Obtenção",
+#'        data = NetoTb2A.1)
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/NetoTb2A.1.txt b/data-raw/NetoTb2A.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..47dea3d5839762917a1946dda48ced9ebdae71d9
--- /dev/null
+++ b/data-raw/NetoTb2A.1.txt
@@ -0,0 +1,33 @@
+ens	sai	dia	perc	tem
+1	10:55	segunda 	C	18.3
+2	11:20	quarta	C	18.9
+3	10:40	sexta	B	10.9
+4	11:25	segunda 	C	20.7
+5	12:50	sexta	B	11.4
+6	11:30	quarta	C	22.9
+7	11:25	quarta	B	12.1
+8	07:35	ter�a	A	12.8
+9	08:10	segunda 	C	56.3
+10	07:00	ter�a	A	13.3
+11	08:10	quinta	B	10.9
+12	17:00	sexta	A	13.1
+13	15:00	quarta	A	12.7
+14	12:30	segunda 	C	20.6
+15	07:30	ter�a	C	18.9
+16	12:30	quarta	B	11
+17	08:15	sexta	B	10.3
+18	07:05	quinta	A	13
+19	12:50	segunda 	C	18.6
+20	07:35	ter�a	A	13
+21	08:00	quinta	B	10.6
+22	09:20	quarta	B	10.4
+23	07:15	quinta	C	21.5
+24	08:15	sexta	B	10.9
+25	08:40	segunda 	B	10.9
+26	08:40	quarta	B	11
+27	09:00	sexta	C	19.1
+28	10:00	quarta	C	16.1
+29	09:10	sexta	B	12.1
+30	09:15	quarta	C	18.1
+31	11:15	segunda 	B	12.2
+32	14:30	sexta	C	19.2
diff --git a/data/NetoTb2A.1.rda b/data/NetoTb2A.1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..7b82583c3a097839d543c3975fa536e95fdb0ef0
Binary files /dev/null and b/data/NetoTb2A.1.rda differ
diff --git a/man/NetoTb2A.1.Rd b/man/NetoTb2A.1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..ecc0a301ad817ad655432b086013d5621faf8bb9
--- /dev/null
+++ b/man/NetoTb2A.1.Rd
@@ -0,0 +1,45 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.1.R
+\name{NetoTb2A.1}
+\alias{NetoTb2A.1}
+\title{De casa para o trabalho}
+\format{Um \code{data.frame} com 32 observações e 5 variáveis, em que
+
+\describe{
+
+\item{\code{ens}}{Ensaio correspondente.}
+
+\item{\code{sai}}{Fator de 25 níveis qualitativos referente aos
+   horários de saída do pesquisador.}
+   
+\item{\code{dia}}{Fator de 5 níveis qualitativos referente aos dias
+   da semana em que o pesquisador realizou o percurso.}
+
+\item{\code{perc}}{Fator de 3 níveis referente ao percurso realizado
+   pelo pesquisador}
+
+\item{\code{tem}}{Tempo de viagem, em minutos}
+
+}}
+\source{
+Barros Neto, Benício de (2010), (Tabela 2A.1, pág. 86)
+}
+\description{
+A tabela contém resultados de 32 ensaios em que foi
+   cronometrado o tempo transcorrido desde a passagem por uma ponte
+   até a chegada do pesquisador ao seu destino final.
+}
+\examples{
+
+library(lattice)
+
+data(NetoTb2A.1)
+str(NetoTb2A.1)
+
+xyplot(tem ~ ens, xlab = "Ensaio", ylab = "Tempo",
+       main = "Tempos do Experimento na Ordem de Obtenção",
+       data = NetoTb2A.1)
+
+}
+\keyword{DBC}
+