diff --git a/R/CamposEg5.1.9.2.R b/R/CamposEg5.1.9.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..f787912706375ca9b92d0f21d1ad908f041a814b
--- /dev/null
+++ b/R/CamposEg5.1.9.2.R
@@ -0,0 +1,32 @@
+#' @name CamposEg5.1.9.2
+#' @title Selecionar Seis Provadores de Vinho Para se Proceder a um Ensaio de Degustação.
+#' @description Pretendendo-se selecionar seis provadores de vinho para se proceder a um 
+#' ensaio de degustação, foram formados dois grupos: um de rapazes e outro de moças, e com 
+#' eles foi realizado um pré-teste para a seleção. Numa mesa eram colocados cinco cálices, sendo 
+#' três do vinho em questão e dois de outros vinhos. O parecer de cada degustador era obtido pela 
+#' média das notas(de 0 a 10) atribuídas aos três cálices.
+#' @format Um \code{data.frame} com 6 observações e 2 variáveis, em que
+#'      
+#'
+#' \describe{
+#'
+#' \item{\code{X}}{ Média da nota do grupo feminino.  }
+#'
+#' \item{\code{Y}}{ Média da nota do grupo masculino. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 5.1.9.2, pág. 168.
+#' @examples
+#' 
+#' library(lattice)
+#' 
+#' data(CamposEg5.1.9.2)
+#' str(CamposEg5.1.9.2)
+#' 
+#' boxplot(CamposEg5.1.9.2$X, CamposEg5.1.9.2$Y, 
+#'         names=c("Moças (X)","Rapazes (Y)"))
+#' 
+#' ansari.test(CamposEg5.1.9.2$X, CamposEg5.1.9.2$Y)
+
+NULL
diff --git a/R/CamposEg5.2.5.1.R b/R/CamposEg5.2.5.1.R
new file mode 100644
index 0000000000000000000000000000000000000000..a50183cb0187d8bc6a7f903f4a35f044597e60ee
--- /dev/null
+++ b/R/CamposEg5.2.5.1.R
@@ -0,0 +1,28 @@
+#' @name CamposEg5.2.5.1
+#' @title Numero Médio de Hospedes em Duas Categorias de Hotéis. 
+#' @description Pretendendo-se determinar o número médio de hóspedes em duas categorias de 
+#' hotéis, foram tomadas as médias de 16 hotéis de uma das categorias (A) e 8 da outra (B), cobrindo 
+#' um período de três meses. 
+#' @format Um \code{data.frame} com 16 observações e 2 variáveis, em
+#'      que
+#'
+#' \describe{
+#'
+#' \item{\code{A}}{ Média diária de hóspedes no hotel de categoria A. }
+#'
+#' \item{\code{B}}{ Média diária de hóspedes no hotel de categoria A. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exemplo 5.2.5.1, pág. 173.
+#' @examples
+#' 
+#' library(lattice)
+#' 
+#' data(CamposEg5.2.5.1)
+#' str(CamposEg5.2.5.1)
+#' 
+#' boxplot(CamposEg5.2.5.1$A, CamposEg5.2.5.1$B, 
+#'         names=c("CATEGORIA A","CATEGORIA B"))
+#' 
+NULL
diff --git a/R/CamposEx5.1.10.2.R b/R/CamposEx5.1.10.2.R
new file mode 100644
index 0000000000000000000000000000000000000000..07f833bc7c305e8726376d3a08900505e58aa20a
--- /dev/null
+++ b/R/CamposEx5.1.10.2.R
@@ -0,0 +1,33 @@
+#' @name CamposEx5.1.10.2
+#' @title Variações de Altura de Filhos em Relação à Altura dos Pais.
+#' @description Num estudo sobre variação de altura de filhos em relação à altura dos pais, foram 
+#' consideradas duas Classes:
+#' Classe A (X): Altura de filhos descendentes de pais baixos.
+#' Classe B (Y): Altura de filhos descendentes de pais altos.
+#' Os resultados obtidos para as alturas (em metros) com dez indivíduos da classe A e oito da 
+#' classe B.
+#' @format Um \code{data.frame} com 10 observações e 2 variáveis, em
+#'      que
+#'
+#' \describe{
+#'
+#' \item{\code{X}}{ Resultados obtidos para as alturas (em metro) com dez indivíduos da classe A. }
+#'
+#' \item{\code{Y}}{ Resultados obtidos para as alturas (em metro) com oito indivíduos da classe B. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exercício 5.1.10.2, pág. 169.
+#' @examples
+#' 
+#' library(lattice)
+#' 
+#' data(CamposEx5.1.10.2)
+#' str(CamposEx5.1.10.2)
+#' 
+#' boxplot(CamposEx5.1.10.2$X, CamposEx5.1.10.2$Y, 
+#'         names=c("Classe A (X)","Classe B (Y)"))
+#' 
+#' ansari.test(CamposEx5.1.10.2$X, CamposEx5.1.10.2$Y)
+#' 
+NULL
diff --git a/R/CamposEx5.1.10.4.R b/R/CamposEx5.1.10.4.R
new file mode 100644
index 0000000000000000000000000000000000000000..91f29a12a4426f97abf80230c9ffd2af8707c4b8
--- /dev/null
+++ b/R/CamposEx5.1.10.4.R
@@ -0,0 +1,30 @@
+#' @name CamposEx5.1.10.4
+#' @title Avaliação do Aproveitamento de Alunos Utilizando Dois Métodos. 
+#' @description Dois métodos (A e B) de avaliação do aproveitamento de alunos forma 
+#' utilizados. O método A representando o tradicional e o método B, a avaliação  através de 
+#' questionários e entrevista pessoais.  Foram tomadas amostras de dez alunos para cada método.
+#' @format Um \code{data.frame} com 10 observações e 2 variáveis, em
+#'      que
+#'
+#' \describe{
+#'
+#' \item{\code{X}}{ Avaliação do Método A (Tradicional).  }
+#'
+#' \item{\code{Y}}{ Avaliação do Método B. }
+#'
+#' }
+#' @keywords TODOS
+#' @source DE CAMPOS; HUMBERTO (1983), Exercício 5.1.10.4, pág. 170.
+#' @examples
+#' 
+#' library(lattice)
+#' 
+#' data(CamposEx5.1.10.4)
+#' str(CamposEx5.1.10.4)
+#' 
+#' boxplot(CamposEx5.1.10.4$X, CamposEx5.1.10.4$Y, 
+#'         names=c("Método A (X)","Método B (Y)"))
+#' 
+#' ansari.test(CamposEx5.1.10.4$X, CamposEx5.1.10.4$Y)
+#' 
+NULL
diff --git a/data-raw/CamposEg5.1.9.2.txt b/data-raw/CamposEg5.1.9.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..5901b4b04c6cd7647706ad2f1c706683eaf5d980
--- /dev/null
+++ b/data-raw/CamposEg5.1.9.2.txt
@@ -0,0 +1,7 @@
+X	Y
+7.5	5.8
+8.3	6.5
+7.7	8.3
+8	6.3
+6.7	9
+8.5	9.7
diff --git a/data-raw/CamposEg5.2.5.1.txt b/data-raw/CamposEg5.2.5.1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..5f0d805230454579d87ca25624ef10b0114fe595
--- /dev/null
+++ b/data-raw/CamposEg5.2.5.1.txt
@@ -0,0 +1,17 @@
+A	B
+18.3	11.6
+14.7	7.5
+18.8	13.4
+15.3	13.2
+10.6	18.3
+13.2	10.5
+14.8	8.2
+15.5	11.4
+15	7.3
+16.4	NA
+17.2	NA
+19.4	NA
+17.5	NA
+18.3	NA
+15.4	NA
+16.3	NA
diff --git a/data-raw/CamposEx5.1.10.2.txt b/data-raw/CamposEx5.1.10.2.txt
new file mode 100644
index 0000000000000000000000000000000000000000..a7421b24e9efb86e0053af90eb77121913f7e3fc
--- /dev/null
+++ b/data-raw/CamposEx5.1.10.2.txt
@@ -0,0 +1,11 @@
+X	Y
+1.45	1.63
+1.82	1.86
+1.6	1.98
+1.67	1.37
+1.37	1.75
+1.52	1.63
+1.63	1.71
+1.44	1.79
+1.44	NA
+1.75	NA
diff --git a/data-raw/CamposEx5.1.10.4.txt b/data-raw/CamposEx5.1.10.4.txt
new file mode 100644
index 0000000000000000000000000000000000000000..b6d62f2a29268763888c3aeb5d9d65859aa5a1b5
--- /dev/null
+++ b/data-raw/CamposEx5.1.10.4.txt
@@ -0,0 +1,11 @@
+X	Y
+91	105
+90	103
+93	108
+97	94
+98	107
+102	106
+95	112
+96	99
+104	110
+101	109
diff --git a/data/CamposEg5.1.9.2.rda b/data/CamposEg5.1.9.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..429af68366a312080c14377a383802afeb32489a
Binary files /dev/null and b/data/CamposEg5.1.9.2.rda differ
diff --git a/data/CamposEg5.2.5.1.rda b/data/CamposEg5.2.5.1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..6a26f79ad2e992b1aa605339a1eada5bca505a7d
Binary files /dev/null and b/data/CamposEg5.2.5.1.rda differ
diff --git a/data/CamposEx5.1.10.2.rda b/data/CamposEx5.1.10.2.rda
new file mode 100644
index 0000000000000000000000000000000000000000..c5972d3320e46cdfae842b2689f6b6b3e30a151e
Binary files /dev/null and b/data/CamposEx5.1.10.2.rda differ
diff --git a/data/CamposEx5.1.10.4.rda b/data/CamposEx5.1.10.4.rda
new file mode 100644
index 0000000000000000000000000000000000000000..66b04d1059f4a0e3ac7caecd17da21950da7f2f1
Binary files /dev/null and b/data/CamposEx5.1.10.4.rda differ
diff --git a/man/CamposEg5.1.9.2.Rd b/man/CamposEg5.1.9.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..e7df0a7073367f87584caa8542fe3f097530454e
--- /dev/null
+++ b/man/CamposEg5.1.9.2.Rd
@@ -0,0 +1,39 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEg5.1.9.2.R
+\name{CamposEg5.1.9.2}
+\alias{CamposEg5.1.9.2}
+\title{Selecionar Seis Provadores de Vinho Para se Proceder a um Ensaio de Degustação.}
+\format{Um \code{data.frame} com 6 observações e 2 variáveis, em que
+     
+
+\describe{
+
+\item{\code{X}}{ Média da nota do grupo feminino.  }
+
+\item{\code{Y}}{ Média da nota do grupo masculino. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exemplo 5.1.9.2, pág. 168.
+}
+\description{
+Pretendendo-se selecionar seis provadores de vinho para se proceder a um 
+ensaio de degustação, foram formados dois grupos: um de rapazes e outro de moças, e com 
+eles foi realizado um pré-teste para a seleção. Numa mesa eram colocados cinco cálices, sendo 
+três do vinho em questão e dois de outros vinhos. O parecer de cada degustador era obtido pela 
+média das notas(de 0 a 10) atribuídas aos três cálices.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEg5.1.9.2)
+str(CamposEg5.1.9.2)
+
+boxplot(CamposEg5.1.9.2$X, CamposEg5.1.9.2$Y, 
+        names=c("Moças (X)","Rapazes (Y)"))
+
+ansari.test(CamposEg5.1.9.2$X, CamposEg5.1.9.2$Y)
+}
+\keyword{TODOS}
+
diff --git a/man/CamposEg5.2.5.1.Rd b/man/CamposEg5.2.5.1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..b60e7bbcbce79e5e9c6bde3359cca33f5ad4e09b
--- /dev/null
+++ b/man/CamposEg5.2.5.1.Rd
@@ -0,0 +1,36 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEg5.2.5.1.R
+\name{CamposEg5.2.5.1}
+\alias{CamposEg5.2.5.1}
+\title{Numero Médio de Hospedes em Duas Categorias de Hotéis.}
+\format{Um \code{data.frame} com 16 observações e 2 variáveis, em
+     que
+
+\describe{
+
+\item{\code{A}}{ Média diária de hóspedes no hotel de categoria A. }
+
+\item{\code{B}}{ Média diária de hóspedes no hotel de categoria A. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exemplo 5.2.5.1, pág. 173.
+}
+\description{
+Pretendendo-se determinar o número médio de hóspedes em duas categorias de 
+hotéis, foram tomadas as médias de 16 hotéis de uma das categorias (A) e 8 da outra (B), cobrindo 
+um período de três meses.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEg5.2.5.1)
+str(CamposEg5.2.5.1)
+
+boxplot(CamposEg5.2.5.1$A, CamposEg5.2.5.1$B, 
+        names=c("CATEGORIA A","CATEGORIA B"))
+
+}
+\keyword{TODOS}
+
diff --git a/man/CamposEx5.1.10.2.Rd b/man/CamposEx5.1.10.2.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..4eb345dc906865ca3e0763b19d7c292298423636
--- /dev/null
+++ b/man/CamposEx5.1.10.2.Rd
@@ -0,0 +1,41 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEx5.1.10.2.R
+\name{CamposEx5.1.10.2}
+\alias{CamposEx5.1.10.2}
+\title{Variações de Altura de Filhos em Relação à Altura dos Pais.}
+\format{Um \code{data.frame} com 10 observações e 2 variáveis, em
+     que
+
+\describe{
+
+\item{\code{X}}{ Resultados obtidos para as alturas (em metro) com dez indivíduos da classe A. }
+
+\item{\code{Y}}{ Resultados obtidos para as alturas (em metro) com oito indivíduos da classe B. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exercício 5.1.10.2, pág. 169.
+}
+\description{
+Num estudo sobre variação de altura de filhos em relação à altura dos pais, foram 
+consideradas duas Classes:
+Classe A (X): Altura de filhos descendentes de pais baixos.
+Classe B (Y): Altura de filhos descendentes de pais altos.
+Os resultados obtidos para as alturas (em metros) com dez indivíduos da classe A e oito da 
+classe B.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEx5.1.10.2)
+str(CamposEx5.1.10.2)
+
+boxplot(CamposEx5.1.10.2$X, CamposEx5.1.10.2$Y, 
+        names=c("Classe A (X)","Classe B (Y)"))
+
+ansari.test(CamposEx5.1.10.2$X, CamposEx5.1.10.2$Y)
+
+}
+\keyword{TODOS}
+
diff --git a/man/CamposEx5.1.10.4.Rd b/man/CamposEx5.1.10.4.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..9fbd807fac6cc4c6892aacadb6178ad84ef86c18
--- /dev/null
+++ b/man/CamposEx5.1.10.4.Rd
@@ -0,0 +1,38 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/CamposEx5.1.10.4.R
+\name{CamposEx5.1.10.4}
+\alias{CamposEx5.1.10.4}
+\title{Avaliação do Aproveitamento de Alunos Utilizando Dois Métodos.}
+\format{Um \code{data.frame} com 10 observações e 2 variáveis, em
+     que
+
+\describe{
+
+\item{\code{X}}{ Avaliação do Método A (Tradicional).  }
+
+\item{\code{Y}}{ Avaliação do Método B. }
+
+}}
+\source{
+DE CAMPOS; HUMBERTO (1983), Exercício 5.1.10.4, pág. 170.
+}
+\description{
+Dois métodos (A e B) de avaliação do aproveitamento de alunos forma 
+utilizados. O método A representando o tradicional e o método B, a avaliação  através de 
+questionários e entrevista pessoais.  Foram tomadas amostras de dez alunos para cada método.
+}
+\examples{
+
+library(lattice)
+
+data(CamposEx5.1.10.4)
+str(CamposEx5.1.10.4)
+
+boxplot(CamposEx5.1.10.4$X, CamposEx5.1.10.4$Y, 
+        names=c("Método A (X)","Método B (Y)"))
+
+ansari.test(CamposEx5.1.10.4$X, CamposEx5.1.10.4$Y)
+
+}
+\keyword{TODOS}
+