From 7d60ee6f4727096e6c9c7fb2c8ba46aeb1322117 Mon Sep 17 00:00:00 2001
From: Cesar Taconeli <cetaconeli@gmail.com>
Date: Mon, 21 Mar 2016 10:53:41 -0300
Subject: [PATCH] =?UTF-8?q?Conclui=20revis=C3=A3o=20das=20tabelas=20do=20C?=
 =?UTF-8?q?ap=C3=ADtulo=206.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/MingotiAnA1.R  | 17 ++++++++++-------
 R/MingotiTb6.1.R |  6 +++---
 R/MingotiTb6.8.R | 20 ++++++++++----------
 3 files changed, 23 insertions(+), 20 deletions(-)

diff --git a/R/MingotiAnA1.R b/R/MingotiAnA1.R
index 7d3ec6ce..b24d4ca3 100644
--- a/R/MingotiAnA1.R
+++ b/R/MingotiAnA1.R
@@ -11,12 +11,12 @@
 #' \item{\code{id}}{Número de identificação do indivíduo.}
 #' 
 #' \item{\code{sexo}}{Sexo do indivíduo 
-#'     (onde 0 para mulheres e 1 para homens).}
+#'     (0 para mulheres e 1 para homens).}
 #' 
 #' \item{\code{sabor}}{Nota atribuída ao sabor do produto.} 
 #'    
 #'
-#' \item{\code{aroma}}{Nota  atribuída ao aroma do produto.} 
+#' \item{\code{aroma}}{Nota atribuída ao aroma do produto.} 
 #'    
 #'     
 #' \item{\code{cor}}{Nota atribuída à cor do produto.} 
@@ -35,7 +35,7 @@
 #'    produto.}
 #'
 #' }
-#' @keywords Análise fatorial
+#' @keywords AnaFat
 #' @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).
@@ -46,9 +46,12 @@
 #'
 #' da <- reshape(MingotiAnA1, direction = "long", varying = list(3:9),
 #'               v.names = "notas", timevar = "atributo")
+#' tab<-with(da,data.frame(table(sexo,atributo,notas)))
+#' names(tab)<-c('sexo','atributo','notas','freq')              
 #' library(lattice)
-#'
-#' xyplot(notas ~ atributo, groups = sexo, data = da,
-#'       jitter.y = TRUE, type = c("p", "a"), auto.key = TRUE)
-#'
+#' barchart(freq~atributo|sexo,groups=notas,data=tab,
+#'      xlab='Atributo',ylab='Freq',auto.key=list(space="top", columns=5,
+#'      title="Nota", cex.title=1),main="Distribuição das notas atribuídas ao produto",
+#'      strip=strip.custom(factor.levels=c("Mulheres","Homens")),
+#'      scales=list(x=list(labels=c("Sabor","Aroma","Cor","Textu","Utili","Local","Embal"))))
 NULL
\ No newline at end of file
diff --git a/R/MingotiTb6.1.R b/R/MingotiTb6.1.R
index 8aa1bb12..f61058c0 100644
--- a/R/MingotiTb6.1.R
+++ b/R/MingotiTb6.1.R
@@ -1,5 +1,5 @@
 #' @name MingotiTb6.1
-#' @title Renda mensal de seis indivíduos de uma localidade
+#' @title Renda mensal de seis indivíduos de certa localidade
 #' @description Dados referente às rendas mensais (em quantidade de 
 #'     salários mínimos) e às idades de seis indivíduos de uma
 #'     localidade.
@@ -10,12 +10,12 @@
 #' \item{\code{id}}{Identificação do indivíduo  
 #'     (A-F).}
 #'
-#' \item{\code{renda}}{Renda mensal em quantidade de salários mínimos.}
+#' \item{\code{renda}}{Renda mensal (em quantidade de salários mínimos).}
 #'
 #' \item{\code{idade}}{Idade do indivíduo.}
 #'
 #' }
-#' @keywords Análise de agrupamentos
+#' @keywords AnaClus
 #' @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 159).
diff --git a/R/MingotiTb6.8.R b/R/MingotiTb6.8.R
index 4c25b8ed..b093e325 100644
--- a/R/MingotiTb6.8.R
+++ b/R/MingotiTb6.8.R
@@ -1,6 +1,6 @@
 #' @name MingotiTb6.8
 #' @title Índices de desenvolvimento de países
-#' @description Dados relativos a 
+#' @description Dados referentes a 
 #'     índices de expectativa de vida, educação, renda (PIB) e 
 #'     estabilidade política e de segurança de 21 países. Os índices foram 
 #'     construídos segundo metodologia da ONU. Para qualquer um deles, maiores 
@@ -11,22 +11,22 @@
 #'
 #' \item{\code{pais}}{Nomes dos 21 países.}
 #'
-#' \item{\code{expecvida}}{Índice da esperança de vida que mede a 
-#'     realização relativa de um país na esperança de vida à nascença.}
+#' \item{\code{expecvida}}{Índice baseado na esperança de vida, medindo a 
+#'     realização relativa de um país na esperança de vida ao nascer.}
 #'
-#' \item{\code{educ}}{Índice da educação que mede a realização relativa 
-#'     de um país tanto na alfabetização de adultos como na 
-#'     escolarização bruta combinada do primário, secundário e 
+#' \item{\code{educ}}{Índice referente ao nível de educação, medindo a realização relativa 
+#'     de um país tanto na alfabetização de adultos quanto na 
+#'     escolarização bruta combinada dos níveis primário, secundário e 
 #'     superior.}
 #'
-#' \item{\code{pib}}{Índice do PIB, que é calculado utilizando o PIB
-#'     per capita ajustado (dólares) no qual usa-se o logarítimo.}
+#' \item{\code{pib}}{Índice baseado no PIB, calculado utilizando o PIB
+#'     per capita ajustado (dólares).}
 #'     
-#' \item{\code{estabpoli}}{Índice de percepções da probabilidade de 
+#' \item{\code{estabpoli}}{Índice baseado na percepção da probabilidade de 
 #'     desestabilização (tensões étnicas, conflito armado, etc).}
 #'
 #' }
-#' @keywords Análise de agrupamentos
+#' @keywords AnaClust
 #' @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 184).
-- 
GitLab