diff --git a/R/PaulinoTb9.15.R b/R/PaulinoTb9.15.R
index ff75c1428c7594f44796b13945febc0ba96ed3cd..f894664dd8367d440980f99978041c2a8be7891a 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 7334d1ce911c786e6ee8433f023d9eccb499bddb..5a3f355b612f3638d413178f3bd063e6ac9a3429 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
Binary files a/data/PaulinoTb9.15.rda and b/data/PaulinoTb9.15.rda differ
diff --git a/man/PaulinoTb9.15.Rd b/man/PaulinoTb9.15.Rd
index 59b0791e27cfd37abf0c71c2a625d1c7c2e35cb1..c327a112b14c74d491a45af37a19ae3ec84f46ce 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}