diff --git a/R/PaulinoTb12.2.R b/R/PaulinoTb12.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..26f0b4f0cea227533690c49d1605df44f305574f
--- /dev/null
+++ b/R/PaulinoTb12.2.R
@@ -0,0 +1,38 @@
+#' @name PaulinoTb12.2
+#' @title Nível de corrimento vaginal em três avaliações.
+#' @description Um estudo realizado, cujo objetivo era avaliar a eficácia
+#' de um tratamento para infecção urinária no que concerne ao
+#' desaparecimento de um de seus sintomas, foi realizado em 50
+#' pacientes com esse tipo de infecção. Foram examinadas em três
+#' instantes: no dia de início do tratamento e 14 e 21 dias após
+#' essa primeira avaliação. A característica observada foi o nível
+#' de corrimento vaginal, classificado como ausente (0), leve(1),
+#' moderado (2) ou intenso (3).
+#' @format Um \code{data.frame} com 150 observações e 3 variáveis.
+#'
+#' \describe{
+#'
+#' \item{\code{pac}}{{Pacientes do sexo feminino que participaram do
+#' estudo.}
+#'
+#' \item{\code{aval}}{Avaliação dada as pacientes examiadas em três
+#' instantes.}
+#'
+#' \item{\code{nivel}}{Nível de corrimento vaginal classificado como
+#' ausente(0), leve (1), moderado (2) ou intenso (3).}
+#' }
+#' @keywords longitudinais
+#' @source AULINO; SINGER (2006), Tabela 12.2, pág. 420.
+#' @examples
+#'
+#' library(lattice)
+#' data(PaulinoTb12.2)
+#'
+#' xyplot(nivel~pac|aval, data = PaulinoTb12.2,
+#' type = c('g','b'),
+#' xlab = 'Indivíduos que participaram do estudo',
+#' ylab = 'Valores observados',
+#' main = " Nível de corrimento vaginal em três avaliações")
+#'
+#'
+NULL
diff --git a/data-raw/PaulinoTb12.2.txt b/data-raw/PaulinoTb12.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..156b1116b16493ecb019a716f06ee321efca3aaa
--- /dev/null
+++ b/data-raw/PaulinoTb12.2.txt
@@ -0,0 +1,151 @@
+pac aval nivel
+1 inicial 1
+2 inicial 2
+3 inicial 1
+4 inicial 2
+5 inicial 2
+6 inicial 2
+7 inicial 2
+8 inicial 1
+9 inicial 3
+10 inicial 2
+11 inicial 2
+12 inicial 1
+13 inicial 2
+14 inicial 2
+15 inicial 2
+16 inicial 2
+17 inicial 2
+18 inicial 1
+19 inicial 1
+20 inicial 2
+21 inicial 1
+22 inicial 3
+23 inicial 3
+24 inicial 2
+25 inicial 2
+26 inicial 2
+27 inicial 2
+28 inicial 3
+29 inicial 2
+30 inicial 2
+31 inicial 3
+32 inicial 0
+33 inicial 1
+34 inicial 1
+35 inicial 1
+36 inicial 1
+37 inicial 0
+38 inicial 0
+39 inicial 1
+40 inicial 2
+41 inicial 1
+42 inicial 1
+43 inicial 2
+44 inicial 2
+45 inicial 2
+46 inicial 2
+47 inicial 3
+48 inicial 3
+49 inicial 2
+50 inicial 3
+1 14 dias 0
+2 14 dias 0
+3 14 dias 0
+4 14 dias 0
+5 14 dias 1
+6 14 dias
+7 14 dias
+8 14 dias 1
+9 14 dias 0
+10 14 dias 1
+11 14 dias 1
+12 14 dias 1
+13 14 dias 0
+14 14 dias 0
+15 14 dias 1
+16 14 dias 1
+17 14 dias 1
+18 14 dias 0
+19 14 dias 0
+20 14 dias 0
+21 14 dias 1
+22 14 dias 1
+23 14 dias 0
+24 14 dias 1
+25 14 dias 0
+26 14 dias 0
+27 14 dias 3
+28 14 dias 0
+29 14 dias 2
+30 14 dias 0
+31 14 dias
+32 14 dias
+33 14 dias 1
+34 14 dias 0
+35 14 dias 0
+36 14 dias 1
+37 14 dias 0
+38 14 dias 0
+39 14 dias 0
+40 14 dias 0
+41 14 dias 1
+42 14 dias 0
+43 14 dias
+44 14 dias 2
+45 14 dias 0
+46 14 dias
+47 14 dias 1
+48 14 dias 0
+49 14 dias 1
+50 14 dias 0
+1 21 dias 0
+2 21 dias
+3 21 dias 0
+4 21 dias 0
+5 21 dias
+6 21 dias
+7 21 dias
+8 21 dias 1
+9 21 dias 0
+10 21 dias 2
+11 21 dias 3
+12 21 dias 0
+13 21 dias 0
+14 21 dias 0
+15 21 dias 1
+16 21 dias 1
+17 21 dias 0
+18 21 dias 0
+19 21 dias 0
+20 21 dias 0
+21 21 dias 0
+22 21 dias 0
+23 21 dias 0
+24 21 dias 1
+25 21 dias 0
+26 21 dias 0
+27 21 dias
+28 21 dias 1
+29 21 dias 1
+30 21 dias 0
+31 21 dias 0
+32 21 dias 0
+33 21 dias 0
+34 21 dias 0
+35 21 dias 0
+36 21 dias 0
+37 21 dias 1
+38 21 dias 1
+39 21 dias 0
+40 21 dias 0
+41 21 dias 0
+42 21 dias 0
+43 21 dias
+44 21 dias
+45 21 dias 1
+46 21 dias 0
+47 21 dias 0
+48 21 dias 0
+49 21 dias 1
+50 21 dias 0
diff --git a/data/PaulinoTb12.2.rda b/data/PaulinoTb12.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..e9e209bca6381feae64940da339bb16ad1541a05
Binary files /dev/null and b/data/PaulinoTb12.2.rda differ
diff --git a/man/PaulinoTb12.2.Rd b/man/PaulinoTb12.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..4fa3631e0691bd8b08808ddb3ddf2ca5943f49d6
--- /dev/null
+++ b/man/PaulinoTb12.2.Rd
@@ -0,0 +1,33 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/PaulinoTb12.2.R
+\name{PaulinoTb12.2}
+\alias{PaulinoTb12.2}
+\title{Nível de corrimento vaginal em três avaliações.}
+\source{
+AULINO; SINGER (2006), Tabela 12.2, pág. 420.
+}
+\description{
+Um estudo realizado, cujo objetivo era avaliar a eficácia
+ de um tratamento para infecção urinária no que concerne ao
+ desaparecimento de um de seus sintomas, foi realizado em 50
+ pacientes com esse tipo de infecção. Foram examinadas em três
+ instantes: no dia de início do tratamento e 14 e 21 dias após
+ essa primeira avaliação. A característica observada foi o nível
+ de corrimento vaginal, classificado como ausente (0), leve(1),
+ moderado (2) ou intenso (3).
+}
+\examples{
+
+library(lattice)
+data(PaulinoTb12.2)
+
+xyplot(nivel~pac|aval, data = PaulinoTb12.2,
+ type = c('g','b'),
+ xlab = 'Indivíduos que participaram do estudo',
+ ylab = 'Valores observados',
+ main = " Nível de corrimento vaginal em três avaliações")
+
+
+}
+\keyword{longitudinais}
+