diff --git a/R/MingotiAnA1.R b/R/MingotiAnA1.R
new file mode 100644
index 0000000000000000000000000000000000000000..6a30f905fb97e85f16f4a2d20e73f14577154e0f
--- /dev/null
+++ b/R/MingotiAnA1.R
@@ -0,0 +1,55 @@
+#' @name MingotiAnA1
+#' @title Aceitação de um novo produto comestível
+#' @description Pesquisa de mercado feita para avaliar a aceitação do
+#'     consumidor por um novo produto comestível. Cada consumidor foi
+#'     convidado a dar uma nota de 1 a 5 para sete atributos do produto.
+#'      
+#' @format data.frame com 200 observações e 9 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{id}{Número de identificação do indivíduo.}
+#' 
+#' \item{sexo}{Variável dicotômica para o sexo do indivíduo, onde 0 
+#'     para mulheres e 1 para homens.}
+#' 
+#' \item{sabor}{Nota dada pelo indivíduo para o sabor do produto, 
+#'    variando de 1 a 5.}
+#'
+#' \item{aroma}{Nota dada pelo indivíduo para o aroma do produto, 
+#'    variando de 1 a 5.}
+#'     
+#' \item{cor}{Nota dada pelo indivíduo para a cor do produto, 
+#'    variando de 1 a 5.}
+#' 
+#' \item{textu}{Nota dada pelo indivíduo para a textura do produto, 
+#'    variando de 1 a 5.}
+#'
+#' \item{utili}{Nota dada pelo indivíduo para a utilidade do produto, 
+#'    variando de 1 a 5.}
+#'     
+#' \item{local}{Nota dada pelo indivíduo para a facilidade de encontrar
+#'    o produto para compra, variando de 1 a 5.}
+#'     
+#' \item{embal}{Nota dada pelo indivíduo para a embalagem do produto, 
+#'    variando de 1 a 5.}
+#'
+#' }
+#' 
+#' @keywords Pesquisa produto 
+#' @source MINGOTI, S.A. (2005). Análise de dados através de métodos de 
+#'     estatística multivariada - uma abordagem aplicada. 
+#'     Belo Horizonte, MG: Editora UFMG. (pg 108).
+#'      
+#' @examples
+#'
+#' data(MingotiAnA1)
+#'
+#' da <- reshape(MingotiAnA1, direction = "long", varying = list(3:9),
+#'               v.names = "notas", timevar = "atributo")
+#' library(lattice)
+#'
+#' xyplot(notas ~ atributo, groups = sexo, data = da,
+#'       jitter.y = TRUE, type = c("p", "a"), auto.key = TRUE)
+#'
+NULL
\ No newline at end of file
diff --git a/data-raw/MingotiAnA1.txt b/data-raw/MingotiAnA1.txt
new file mode 100644
index 0000000000000000000000000000000000000000..02d9d6eb49baaba7600da8812f2195b65b0d9634
--- /dev/null
+++ b/data-raw/MingotiAnA1.txt
@@ -0,0 +1,201 @@
+id	sexo	sabor	aroma	cor	textu	utili	local	embal
+1	1	5	5	4	5	3	4	1
+2	0	1	2	1	2	3	4	1
+3	1	4	5	3	4	5	5	4
+4	1	4	5	3	5	4	5	4
+5	1	5	5	4	5	5	5	5
+6	0	2	3	1	3	2	3	2
+7	0	1	2	1	2	3	4	3
+8	1	3	4	2	5	4	5	4
+9	1	3	4	2	4	2	3	2
+10	1	4	5	3	5	2	3	2
+11	1	4	5	3	5	4	5	4
+12	0	1	2	1	3	2	3	2
+13	1	3	4	2	4	3	4	4
+14	1	5	5	4	5	3	4	1
+15	1	2	3	1	3	4	5	3
+16	1	4	5	3	5	2	3	2
+17	0	2	3	1	3	2	3	2
+18	0	5	5	4	5	2	3	2
+19	0	2	3	1	3	3	4	4
+20	1	2	3	1	4	4	5	2
+21	1	5	5	4	5	4	5	4
+22	1	5	5	4	5	2	3	3
+23	0	2	3	1	3	5	5	4
+24	1	4	5	3	5	5	5	5
+25	0	4	5	3	5	3	4	4
+26	1	4	5	3	5	3	4	4
+27	1	5	5	4	5	5	4	5
+28	0	5	5	4	5	4	5	4
+29	0	4	5	3	5	4	5	4
+30	0	2	3	1	3	3	4	2
+31	0	2	3	1	3	3	4	2
+32	0	3	4	2	4	4	5	4
+33	0	3	4	2	4	3	4	3
+34	0	1	2	1	2	3	4	3
+35	1	5	5	4	5	4	5	3
+36	0	3	4	2	5	3	4	4
+37	0	2	3	1	3	3	4	2
+38	0	2	3	1	3	3	4	2
+39	1	4	5	3	5	3	4	4
+40	0	1	2	2	2	2	3	1
+41	0	2	3	1	3	1	2	1
+42	1	5	5	4	5	2	3	2
+43	1	3	4	2	4	2	3	2
+44	1	3	4	2	4	5	5	5
+45	0	4	5	3	5	4	5	5
+46	1	5	5	4	5	3	4	4
+47	1	3	4	2	4	4	5	3
+48	0	5	5	4	5	4	5	2
+49	0	3	4	2	4	4	5	3
+50	1	5	5	4	5	3	4	3
+51	1	3	4	3	4	3	4	4
+52	1	2	3	1	3	3	4	3
+53	1	1	2	2	2	4	5	4
+54	1	5	5	4	5	4	5	3
+55	1	1	2	2	2	1	2	1
+56	1	4	5	3	5	2	3	2
+57	1	4	5	3	5	3	4	5
+58	1	1	2	2	2	4	5	5
+59	1	2	3	1	3	5	4	5
+60	0	4	5	3	5	3	4	2
+61	1	3	4	2	4	3	4	4
+62	1	5	5	4	5	2	3	2
+63	0	5	5	4	5	4	5	3
+64	1	5	5	4	5	2	3	1
+65	0	2	3	1	3	3	4	2
+66	1	1	2	2	2	3	4	5
+67	0	1	2	2	2	4	5	3
+68	1	1	2	1	2	3	4	3
+69	1	3	4	2	4	4	5	2
+70	1	5	5	4	5	2	3	3
+71	0	4	5	3	5	3	4	1
+72	1	5	5	4	5	5	4	4
+73	1	1	2	1	2	4	5	3
+74	0	1	2	1	2	4	5	3
+75	1	5	5	4	5	4	5	3
+76	0	4	5	3	5	2	3	2
+77	0	4	5	3	5	2	3	1
+78	1	4	5	3	5	2	3	3
+79	1	4	5	3	5	4	5	4
+80	0	5	5	4	5	4	5	2
+81	1	3	4	2	4	4	5	3
+82	0	2	3	1	3	3	4	4
+83	1	3	4	2	4	4	5	4
+84	1	4	5	3	5	4	5	2
+85	1	1	2	3	2	5	4	5
+86	0	5	5	4	5	5	5	5
+87	0	3	4	2	4	2	3	1
+88	1	2	3	1	3	4	5	3
+89	0	5	5	4	5	4	5	5
+90	1	4	5	3	5	2	3	2
+91	1	5	5	4	5	4	5	5
+92	1	5	5	4	5	3	4	1
+93	0	2	3	1	3	2	3	2
+94	1	4	5	3	5	5	5	4
+95	1	2	3	1	3	3	4	2
+96	1	3	4	2	4	5	3	5
+97	0	3	4	2	4	2	3	2
+98	1	5	5	4	5	4	5	5
+99	1	5	5	4	5	2	3	1
+100	0	2	3	1	3	3	4	4
+101	1	3	4	2	4	3	4	3
+102	1	1	2	3	2	5	4	5
+103	0	5	5	4	5	3	4	3
+104	1	1	2	3	2	5	4	5
+105	1	3	4	2	4	3	4	3
+106	1	1	2	3	2	4	5	4
+107	0	2	3	1	3	2	3	2
+108	1	1	2	2	2	5	5	5
+109	0	5	5	4	5	3	4	3
+110	0	1	2	2	2	2	3	2
+111	0	3	4	2	4	2	3	3
+112	1	5	5	4	5	4	5	4
+113	0	5	5	4	5	5	4	5
+114	0	5	5	4	5	3	4	4
+115	0	3	4	2	4	4	5	4
+116	0	5	5	4	5	3	4	4
+117	0	5	5	4	5	5	5	5
+118	0	5	5	4	5	3	4	4
+119	1	5	5	4	5	3	4	3
+120	0	4	5	3	5	5	4	5
+121	0	2	3	1	3	4	5	4
+122	0	1	2	2	2	4	5	4
+123	0	1	2	2	2	3	4	4
+124	0	5	5	4	5	3	4	3
+125	1	4	5	3	5	3	4	3
+126	0	4	5	3	5	5	4	5
+127	0	1	2	2	2	4	5	4
+128	0	3	4	2	4	2	3	2
+129	0	2	3	1	3	3	4	3
+130	0	5	5	4	5	5	4	5
+131	0	5	5	4	5	3	4	3
+132	1	5	5	4	5	2	3	3
+133	0	2	3	1	3	2	3	2
+134	1	1	2	3	2	2	3	2
+135	0	3	4	2	4	5	5	5
+136	1	1	2	3	2	5	5	5
+137	1	3	4	2	4	3	4	3
+138	0	1	2	3	2	4	5	4
+139	0	4	5	3	5	3	4	3
+140	0	4	5	3	5	3	4	3
+141	0	2	3	1	3	5	5	5
+142	0	2	3	2	3	4	5	4
+143	1	1	2	3	2	3	4	3
+144	1	4	5	3	5	1	2	1
+145	0	3	4	2	4	4	5	5
+146	1	2	3	1	3	3	4	4
+147	0	4	5	3	5	5	5	5
+148	1	4	5	3	5	3	4	3
+149	0	2	3	1	3	4	5	4
+150	1	1	2	3	2	2	3	2
+151	0	3	4	2	4	4	5	5
+152	1	4	5	3	5	4	5	5
+153	0	2	3	1	3	2	3	3
+154	0	2	3	1	3	3	4	4
+155	0	4	5	3	5	2	3	3
+156	1	2	3	1	3	4	5	5
+157	1	5	5	4	5	5	5	5
+158	1	5	5	4	5	3	4	4
+159	0	2	3	1	3	2	3	3
+160	0	1	2	2	2	2	3	3
+161	0	2	3	1	3	3	4	4
+162	0	5	5	4	5	3	4	4
+163	0	2	3	1	3	5	4	4
+164	0	1	2	3	2	5	4	4
+165	0	1	2	2	2	4	5	5
+166	1	5	5	4	5	3	4	4
+167	1	1	2	2	2	3	4	4
+168	0	4	5	3	5	4	5	5
+169	0	2	3	1	3	2	3	3
+170	0	1	2	2	2	4	5	5
+171	0	3	4	2	4	4	5	5
+172	0	4	5	3	5	4	5	5
+173	1	2	3	1	3	3	4	4
+174	0	5	5	4	5	4	5	5
+175	1	4	5	3	5	3	4	4
+176	0	1	2	3	2	3	4	4
+177	1	3	4	2	4	4	5	5
+178	1	2	3	1	3	4	5	5
+179	0	3	4	2	4	1	2	2
+180	1	4	5	3	5	4	5	5
+181	1	5	5	4	5	3	4	4
+182	0	2	3	1	3	3	4	4
+183	0	2	3	1	3	3	4	4
+184	0	2	3	1	3	4	5	5
+185	1	4	5	3	5	4	5	5
+186	0	3	4	2	4	3	4	4
+187	0	1	2	2	2	3	4	4
+188	1	4	5	3	5	4	5	5
+189	0	5	5	4	5	3	4	4
+190	0	3	4	2	4	2	3	3
+191	1	3	4	2	4	2	3	3
+192	1	1	2	2	2	4	5	5
+193	0	1	2	2	2	3	4	4
+194	0	3	4	2	4	5	4	4
+195	0	3	4	2	4	1	2	2
+196	1	4	5	3	5	4	5	5
+197	1	1	2	1	2	2	3	3
+198	0	2	3	1	3	2	3	3
+199	0	2	3	1	3	2	3	3
+200	1	4	5	3	5	2	3	3
\ No newline at end of file
diff --git a/data/MingotiAnA1.rda b/data/MingotiAnA1.rda
new file mode 100644
index 0000000000000000000000000000000000000000..9c289272d053b83fdd0309d4b5e97f7b814d7394
Binary files /dev/null and b/data/MingotiAnA1.rda differ
diff --git a/man/MingotiAnA1.Rd b/man/MingotiAnA1.Rd
new file mode 100644
index 0000000000000000000000000000000000000000..94b00787eb770887c2416043fcde36974326683f
--- /dev/null
+++ b/man/MingotiAnA1.Rd
@@ -0,0 +1,61 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/MingotiAnA1.R
+\name{MingotiAnA1}
+\alias{MingotiAnA1}
+\title{Aceitação de um novo produto comestível}
+\format{data.frame com 200 observações e 9 variáveis, em que
+
+\describe{
+
+\item{id}{Número de identificação do indivíduo.}
+
+\item{sexo}{Variável dicotômica para o sexo do indivíduo, onde 0 
+    para mulheres e 1 para homens.}
+
+\item{sabor}{Nota dada pelo indivíduo para o sabor do produto, 
+   variando de 1 a 5.}
+
+\item{aroma}{Nota dada pelo indivíduo para o aroma do produto, 
+   variando de 1 a 5.}
+    
+\item{cor}{Nota dada pelo indivíduo para a cor do produto, 
+   variando de 1 a 5.}
+
+\item{textu}{Nota dada pelo indivíduo para a textura do produto, 
+   variando de 1 a 5.}
+
+\item{utili}{Nota dada pelo indivíduo para a utilidade do produto, 
+   variando de 1 a 5.}
+    
+\item{local}{Nota dada pelo indivíduo para a facilidade de encontrar
+   o produto para compra, variando de 1 a 5.}
+    
+\item{embal}{Nota dada pelo indivíduo para a embalagem do produto, 
+   variando de 1 a 5.}
+
+}}
+\source{
+MINGOTI, S.A. (2005). Análise de dados através de métodos de 
+    estatística multivariada - uma abordagem aplicada. 
+    Belo Horizonte, MG: Editora UFMG. (pg 108).
+}
+\description{
+Pesquisa de mercado feita para avaliar a aceitação do
+    consumidor por um novo produto comestível. Cada consumidor foi
+    convidado a dar uma nota de 1 a 5 para sete atributos do produto.
+}
+\examples{
+
+data(MingotiAnA1)
+
+da <- reshape(MingotiAnA1, direction = "long", varying = list(3:9),
+              v.names = "notas", timevar = "atributo")
+library(lattice)
+
+xyplot(notas ~ atributo, groups = sexo, data = da,
+      jitter.y = TRUE, type = c("p", "a"), auto.key = TRUE)
+
+}
+\keyword{Pesquisa}
+\keyword{produto}
+