diff --git a/man/PaulaEg1.12.2.Rd b/man/PaulaEg1.12.2.Rd
index 55dae6b10e6e9f8ca4624e984b30a4495ad044be..e34d34859c3bef26d30388ede666754e6bdb517e 100644
--- a/man/PaulaEg1.12.2.Rd
+++ b/man/PaulaEg1.12.2.Rd
@@ -43,7 +43,7 @@ bwplot(idade ~ hl | tipo,
bwplot(idade ~ ff | tipo,
data = PaulaEg1.12.2,
ylab = "Idade",
- xlab = "Intensidade da c?lula fibrose-frouxa")
+ xlab = "Intensidade da célula fibrose-frouxa")
barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl),
auto.key=list(space="top", columns=2,
diff --git a/man/PaulaEg1.12.4.Rd b/man/PaulaEg1.12.4.Rd
index 2814b7d07646de8301b7a43ec542b07e0caeb3e5..82f428c3cffb9fad8f61cd130b261f82cf12c6c4 100644
--- a/man/PaulaEg1.12.4.Rd
+++ b/man/PaulaEg1.12.4.Rd
@@ -20,37 +20,38 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
computacional. São Paulo, SP: IME-USP. (Eg 1.12.4, pág. 90)
}
\description{
-Estudo realizado para avaliar a influência da série
- (passagem do tumor) na morte (caquexia) de um certo tipo de rato.
+Estudo realizado para avaliar a influência da série
+ (passagem do tumor) na morte (caquexia) de certa espécie de rato.
Um total de 204 animais teve tumor inoculado num determinado
- momento da série. Para cada animal, além do grupo de passagem,
+ momento da série. Para cada animal, além do grupo de passagem,
foram observadas as variáveis presença de massa tumoral, caquexia
e o tempo de observação.
}
\examples{
data(PaulaEg1.12.4)
-
str(PaulaEg1.12.4)
library(lattice)
-xyplot(grupo ~ tempo | massat,
+xyplot(tempo ~ grupo | massat,
groups = caq,
data = PaulaEg1.12.4,
type = c("p", "smooth"),
- xlab = "Tempo",
- ylab = "Grupo",
- main = "Dispersão para Massa Tumoral não Presente (à esquerda) ou Presente (à direita)",
- auto.key = list(space="top", columns=2,
- title="Presença de caquexia", cex.title=1,
- lines=TRUE, points=FALSE))
-
-bwplot(tempo ~ massat | caq,
+ xlab = "Grupo",
+ ylab = "Tempo",
+ main = paste("Tempo de sobrevivência vs grupo de passagem\\n",
+ "(segundo caquexia e presença de massa tumoral)"),
+ auto.key = list(space = "top", columns = 2,
+ title = "Presença de caquexia", cex.title = 1,
+ lines = TRUE, points = FALSE))
+
+bwplot(tempo ~ massat | caq,
data = PaulaEg1.12.4,
ylab = "Tempo",
- xlab = "Presença de massa tumoral",
- main = "Bwplot para Caquexia não Presente (à esquerda) ou Presente (à direita)")
+ xlab = "Presença de massa tumoral",
+ main = paste("Bwplot para Caquexia não Presente\\n",
+ "(à esquerda) ou Presente (à direita)"))
}
\keyword{MLG}
diff --git a/man/PaulaEg1.12.5.Rd b/man/PaulaEg1.12.5.Rd
index ff0d482200f0f6c971666e0c8dab30275652f64d..82c603b44b556474295c8f164951d28944222dfb 100644
--- a/man/PaulaEg1.12.5.Rd
+++ b/man/PaulaEg1.12.5.Rd
@@ -26,8 +26,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
\description{
Dados referentes ao consumo de combustível em 48 estados
norte-americanos. O interesse nesse estudo é tentar explicar o
- consumo de combustível pelas Variáveis taxa, licença, renda e
- estradas.
+ consumo de combustível com base em variáveis econômicas.
}
\examples{
@@ -46,6 +45,7 @@ xyplot(cons ~ est,
ylab = "Consumo",
xlab = "Estados",
data = PaulaEg1.12.5,
+ type = 'h',
main = "Consumo por Habitante em cada Estado",
grid = TRUE)
diff --git a/man/PaulaEx1.13.19.Rd b/man/PaulaEx1.13.19.Rd
index 882ac2e2cbc6132baf7e6f997bff42c3e1512d3e..2090f8b0465d84348303be899695b3da10b214e5 100644
--- a/man/PaulaEx1.13.19.Rd
+++ b/man/PaulaEx1.13.19.Rd
@@ -15,13 +15,13 @@
\item{\code{analf}}{Proporção de analfabetos em 1970.}
\item{\code{crime}}{Taxa de criminalidade por cem mil habitantes em
- 1976.}
+ 1976.}
\item{\code{estud}}{Porcentagem de estudantes que concluem o segundo
grau em 1970.}
\item{\code{ndias}}{Número de dias do ano com temperatura abaixo de
- 0ºC na cidade mais importante do estado.}
+ 0\eqn{^\circ C} na cidade mais importante do estado.}
\item{\code{area}}{Área do estado (em milhas quadradas).}
@@ -42,25 +42,17 @@ Dados referentes a um estudo demográfico sobre os 50
informações.
}
\examples{
-data(PaulaEx1.13.19)
+data(PaulaEx1.13.19)
str(PaulaEx1.13.19)
-library(lattice)
-splom(PaulaEx1.13.19[, -1],
- type = c("p", "g", "smooth"),
- col.line = 1)
-
-# Distribuição marginal das variáveis
-par(mfrow = c(3, 3))
-vn <- colnames(PaulaEx1.13.19)
-sapply(1:8, function(x) {
- hist(PaulaEx1.13.19[, x+1], prob = TRUE, main = vn[x+1])
- lines(density(PaulaEx1.13.19[, x+1]), col = 4)
- rug(PaulaEx1.13.19[, x+1])
- invisible(x)
-})
+library(car)
+
+PaulaEx1.13.19$dens <- PaulaEx1.13.19$pop/PaulaEx1.13.19$area
+scatterplotMatrix(~expvi + analf + crime + estud + ndias + dens,
+ data = PaulaEx1.13.19)
+
}
-\keyword{TODO}
+\keyword{MLG}
diff --git a/man/PaulaEx3.7.8.Rd b/man/PaulaEx3.7.8.Rd
index 3427ba9c39a5baf8c9e72054adb11b1456fef921..92c0309a8d5fd7148ee6204568c521204b2a24ea 100644
--- a/man/PaulaEx3.7.8.Rd
+++ b/man/PaulaEx3.7.8.Rd
@@ -36,14 +36,11 @@ library(lattice)
PaulaEx3.7.8$ntemp <- as.factor(PaulaEx3.7.8$ntemp)
-xyplot(temp ~ numid + ntemp,
- groups = sgerm,
+PaulaEx3.7.8$numid <- as.factor(PaulaEx3.7.8$numid)
+xyplot(sgerm ~ numid | ntemp,
data = PaulaEx3.7.8,
- xlab = " ",
- ylab = "Densidade",
- auto.key = list(space="top", columns=2,
- title="Espécie", cex.title=1,
- lines=TRUE, points=FALSE))
+ xlab = "Nível de temperatura",
+ ylab = "Número de sementes germinadas")
}
\keyword{MLG}
diff --git a/man/PaulaTb1.6.Rd b/man/PaulaTb1.6.Rd
index a5fe577a29cdfca93b6243f1acaa232280d4479b..b5941ae2956fd9846b5f095bb841558c7a7a489d 100644
--- a/man/PaulaTb1.6.Rd
+++ b/man/PaulaTb1.6.Rd
@@ -34,6 +34,7 @@ xyplot(rendm ~ est,
ylab = "Renda",
xlab = "Estados",
data = PaulaTb1.6,
+ type = 'h',
main = "Renda Média Mensal em Estado",
grid = TRUE)
diff --git a/man/PaulaTb3.21.Rd b/man/PaulaTb3.21.Rd
index 129588f0383eaacd45461f23e64105c0f55db429..3b13aa00fe52573d474dd6ac5573a14de72d8831 100644
--- a/man/PaulaTb3.21.Rd
+++ b/man/PaulaTb3.21.Rd
@@ -20,7 +20,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio
computacional. São Paulo, SP: IME-USP. (Tb 3.21, pág. 257)
}
\description{
-Experimentos com duas espécies de *rotifers*, um tipo
+Experimento com duas espécies de *rotifers*, um tipo
microscópio de invertebrado aquático. São apresentados pra cada
espécie a densidade relativa da substância, o número de *rotifers*
expostos e o número de *rotifers* em suspensão.
@@ -38,10 +38,8 @@ xyplot(PaulaTb3.21$susp/PaulaTb3.21$exp ~ dens,
data = PaulaTb3.21,
xlab = "Densidade",
ylab = "Proporção de rotifers suspensos",
- type = c("o"),
- auto.key = list(space="top", columns=2,
- title="Espécie", cex.title=1,
- lines=TRUE, points=FALSE))
+ type = c("p"),
+ auto.key = TRUE)
}
\keyword{MLG}