From 37cdb7414d0a6301e42ebde3756d9ed51dbd872a Mon Sep 17 00:00:00 2001
From: Jhenifer <jhenicaet@gmail.com>
Date: Fri, 3 Feb 2017 13:13:25 -0200
Subject: [PATCH] =?UTF-8?q?Realiza=20corre=C3=A7=C3=B5es?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 R/PaulinoTb9.15.R          |   6 +--
 data-raw/PaulinoTb9.15.txt |  96 ++++++++++++++++++-------------------
 data/PaulinoTb9.15.rda     | Bin 414 -> 429 bytes
 man/PaulinoTb9.15.Rd       |  12 ++---
 4 files changed, 57 insertions(+), 57 deletions(-)

diff --git a/R/PaulinoTb9.15.R b/R/PaulinoTb9.15.R
index ff75c142..f894664d 100644
--- a/R/PaulinoTb9.15.R
+++ b/R/PaulinoTb9.15.R
@@ -23,7 +23,7 @@
 #' \item{\code{nalunos}}{Número de alunos.}
 #'
 #' }
-#' @keywords TC dados-categóricos
+#' @keywords contingência dados-categóricos
 #' @source PAULINO; SINGER (2006), Tabela 9.15, pág. 286.
 #' @examples
 #'
@@ -38,13 +38,13 @@
 #' library(latticeExtra)
 #' 
 #' useOuterStrips(
-#'     barchart(nalunos ~ factor(ano) | agreg + drogas, groups = sexo,
+#'     barchart(nalunos ~ drogas | agreg + factor(ano), groups = sexo,
 #'              horizontal = FALSE,
 #'              data = PaulinoTb9.15,
 #'              auto.key = list(space = "top", columns = 2,
 #'                              cex.title = 1, rectangles = TRUE,
 #'                              points = FALSE, title = "Sexo"),
-#'              xlab = "Ano",
+#'              xlab = "Drogas",
 #'              ylab = "Número de alunos")
 #' )
 #'
diff --git a/data-raw/PaulinoTb9.15.txt b/data-raw/PaulinoTb9.15.txt
index 7334d1ce..5a3f355b 100644
--- a/data-raw/PaulinoTb9.15.txt
+++ b/data-raw/PaulinoTb9.15.txt
@@ -1,49 +1,49 @@
 ano	sexo	agreg	drogas	nalunos
-1991	m	nuclear	nao	267
-1991	m	nuclear	licitas	577
-1991	m	nuclear	ilicitas	55
-1991	m	monoparental	nao	32
-1991	m	monoparental	licitas	97
-1991	m	monoparental	ilicitas	11
-1991	m	alargada	nao	29
-1991	m	alargada	licitas	82
-1991	m	alargada	ilicitas	6
-1991	m	sem pais	nao	13
-1991	m	sem pais	licitas	39
-1991	m	sem pais	ilicitas	6
-1991	f	nuclear	nao	321
-1991	f	nuclear	licitas	622
-1991	f	nuclear	ilicitas	35
-1991	f	monoparental	nao	55
-1991	f	monoparental	licitas	149
-1991	f	monoparental	ilicitas	16
-1991	f	alargada	nao	49
-1991	f	alargada	licitas	113
-1991	f	alargada	ilicitas	4
-1991	f	sem pais	nao	14
-1991	f	sem pais	licitas	26
-1991	f	sem pais	ilicitas	3
-1994	m	nuclear	nao	118
-1994	m	nuclear	licitas	289
-1994	m	nuclear	ilicitas	45
-1994	m	monoparental	nao	21
-1994	m	monoparental	licitas	53
-1994	m	monoparental	ilicitas	9
-1994	m	alargada	nao	14
-1994	m	alargada	licitas	35
-1994	m	alargada	ilicitas	3
-1994	m	sem pais	nao	6
-1994	m	sem pais	licitas	20
-1994	m	sem pais	ilicitas	0
-1994	f	nuclear	nao	135
-1994	f	nuclear	licitas	284
-1994	f	nuclear	ilicitas	26
-1994	f	monoparental	nao	27
-1994	f	monoparental	licitas	80
-1994	f	monoparental	ilicitas	13
-1994	f	alargada	nao	20
-1994	f	alargada	licitas	36
-1994	f	alargada	ilicitas	5
-1994	f	sem pais	nao	4
-1994	f	sem pais	licitas	20
-1994	f	sem pais	ilicitas	5
+1991	masculino	nuclear	não	267
+1991	masculino	nuclear	lícitas	577
+1991	masculino	nuclear	ilícitas	55
+1991	masculino	monoparental	não	32
+1991	masculino	monoparental	lícitas	97
+1991	masculino	monoparental	ilícitas	11
+1991	masculino	alargada	não	29
+1991	masculino	alargada	lícitas	82
+1991	masculino	alargada	ilícitas	6
+1991	masculino	sem pais	não	13
+1991	masculino	sem pais	lícitas	39
+1991	masculino	sem pais	ilícitas	6
+1991	feminino	nuclear	não	321
+1991	feminino	nuclear	lícitas	622
+1991	feminino	nuclear	ilícitas	35
+1991	feminino	monoparental	não	55
+1991	feminino	monoparental	lícitas	149
+1991	feminino	monoparental	ilícitas	16
+1991	feminino	alargada	não	49
+1991	feminino	alargada	lícitas	113
+1991	feminino	alargada	ilícitas	4
+1991	feminino	sem pais	não	14
+1991	feminino	sem pais	lícitas	26
+1991	feminino	sem pais	ilícitas	3
+1994	masculino	nuclear	não	118
+1994	masculino	nuclear	lícitas	289
+1994	masculino	nuclear	ilícitas	45
+1994	masculino	monoparental	não	21
+1994	masculino	monoparental	lícitas	53
+1994	masculino	monoparental	ilícitas	9
+1994	masculino	alargada	não	14
+1994	masculino	alargada	lícitas	35
+1994	masculino	alargada	ilícitas	3
+1994	masculino	sem pais	não	6
+1994	masculino	sem pais	lícitas	20
+1994	masculino	sem pais	ilícitas	0
+1994	feminino	nuclear	não	135
+1994	feminino	nuclear	lícitas	284
+1994	feminino	nuclear	ilícitas	26
+1994	feminino	monoparental	não	27
+1994	feminino	monoparental	lícitas	80
+1994	feminino	monoparental	ilícitas	13
+1994	feminino	alargada	não	20
+1994	feminino	alargada	lícitas	36
+1994	feminino	alargada	ilícitas	5
+1994	feminino	sem pais	não	4
+1994	feminino	sem pais	lícitas	20
+1994	feminino	sem pais	ilícitas	5
diff --git a/data/PaulinoTb9.15.rda b/data/PaulinoTb9.15.rda
index 82d0d63cfa0289fc584ec474792cea20e31d734a..b02b046df7852fee6e341f4c9acfe97a17c3776d 100644
GIT binary patch
literal 429
zcmZ>Y%CIzaj8qGbEVW4a&%iXb{@efmesVd@MGI6ILLBUu|3Bc+z{J48#4*8vfq`)Y
zV|9))ufXIhH#J|rnpNpL<<rbpv)EEin4Pa&TsA9h`3flqE?yJH1q@)&8EA4PMUt&?
z0fQ6+124m+x2hTf3W5<6cN}tE!NkbKkgcXQ-^-&jfqBRB)5#x2I2TAKACFPvGL{eW
zdi8QaM}&ds+^I>sStR&>=$twDPmgog{PWhYLT9XhW+YtlqCPI?>*M~%KKg(17wwU^
z$iE>{l6SG8YyY+0SKd6~x63CN9hEMPI2zP?#%m_mqzPh+zA~-OV-jMxeO!0m2JP=B
zkL`_}%(A6nnxm4Epu!sO5+>1O9jkT;N~$=Y-q*B4)F4u<BhiVYdUKUyRx7{Z`X*Ve
zb0rTqKaDoe)zZAPc3#XfORc>Vlca*h)^6u`dm@%yKRLSH>8TGBYn*1~l9-R#$!ezg
zY&@n1ySlDybm=a-^)kP8MsZ?n-i~*MDjmn%=7&8s>MLJh-+LvX?Now*r$x_1hrSfk
j=N1<fR?q%u*;K$FzEmL6KtcJ(?n#=5TAEiLR{sG2gypq%

literal 414
zcmZ>Y%CIzaj8qGbWV&K?k%4L2|7ZXI`^n`r7cEd>2yw7q{{MhO0}}(o1P2BN#tn?s
zIZ9G9eI-0?mSxFJzU3dRxvbY_;bdjEUS@w4sbC+Eugnf6nUft%OiWBJT*$~s6k0Y>
zDn*Lf*@2gVfvv5VSMS0i77ms$l@bZhoaPiJMkWTnMT;UWPjo6UYplPW=roHlfHAMs
zXR2Y-V+~8Y>ETL}9Z}J1=KV~ZvZGZ{K>w+8|E4u}O(W)BUhk-oeEwm0Uf=6@^?e@k
ze;&J5+85qm!@9R@U6a<6GX{ZcyB<Ayc{nykK7#9t-jk5CAyZs}wV1>n@%-FAJ!4Z+
zqw~9GM_;pt>|mHCs-$tFqt%l&$-(JKCQHDNZ!0!4ZR1wD%B!`?$87%!<!Zi7@)eR>
z%|vbf{rCL4^TfjI>Yr0pH1t-?TX4AlaqHnp-y2P*Zs*;3R?#3>NPA|8+eS;-2aT+E
z+ox_!Fn0aA%5$!8YVYdSJKo}kJ6YLh7flkM`b_?idqBmEC03V(4rw|b*eP*x{o1${
X%zaB1M>@@a^v+{Bmk>i#dz1nIB$}@J

diff --git a/man/PaulinoTb9.15.Rd b/man/PaulinoTb9.15.Rd
index 59b0791e..c327a112 100644
--- a/man/PaulinoTb9.15.Rd
+++ b/man/PaulinoTb9.15.Rd
@@ -2,7 +2,7 @@
 % Please edit documentation in R/PaulinoTb9.15.R
 \name{PaulinoTb9.15}
 \alias{PaulinoTb9.15}
-\title{Toxicodependência em Alunos de uma Escola}
+\title{Dependência de tóxicos em Alunos}
 \format{Um \code{data.frame} com 48 observações e 5 variáveis, em que
 
 \describe{
@@ -26,10 +26,10 @@ PAULINO; SINGER (2006), Tabela 9.15, pág. 286.
 }
 \description{
 Inquérito feito com alunos do terceiro ciclo do ensino
-    báico em escolas de Lisboa, sendo estes participantes de um
+    básico em escolas de Lisboa, sendo estes participantes de um
     programa de prevenção a toxicodependência. O inquérito foi
     realizado em duas etapas, a primeira em 1991, ano de início do
-    programa e a segunda em 1994.
+    programa, e a segunda em 1994.
 }
 \examples{
 
@@ -44,17 +44,17 @@ library(lattice)
 library(latticeExtra)
 
 useOuterStrips(
-    barchart(nalunos ~ factor(ano) | agreg + drogas, groups = sexo,
+    barchart(nalunos ~ drogas | agreg + factor(ano), groups = sexo,
              horizontal = FALSE,
              data = PaulinoTb9.15,
              auto.key = list(space = "top", columns = 2,
                              cex.title = 1, rectangles = TRUE,
                              points = FALSE, title = "Sexo"),
-             xlab = "Ano",
+             xlab = "Drogas",
              ylab = "Número de alunos")
 )
 
 }
-\keyword{TC}
+\keyword{contingência}
 \keyword{dados-categóricos}
 
-- 
GitLab