Skip to content
Snippets Groups Projects

Compare revisions

Changes are shown as if the source revision was being merged into the target revision. Learn more about comparing revisions.

Source

Select target project
No results found
Select Git revision

Target

Select target project
  • pet-estatistica/labestData
  • aab15/labestData
  • eys16/labestData
3 results
Select Git revision
Show changes
...@@ -2,8 +2,10 @@ ...@@ -2,8 +2,10 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEg5.5.3} \name{PaulaEg5.5.3}
\alias{PaulaEg5.5.3} \alias{PaulaEg5.5.3}
\title{Ensaio cl\enc{í}{i}nico da pr\enc{é}{e}-exist\enc{ê}{e}ncia de placa dent\enc{á}{a}ria} \title{Ensaio cl\enc{í}{i}nico da pr\enc{é}{e}-exist\enc{ê}{e}ncia de
placa dent\enc{á}{a}ria}
\format{Um \code{data.frame} com 323 observações e 4 variáveis. \format{Um \code{data.frame} com 323 observações e 4 variáveis.
\describe{ \describe{
\item{\code{volunt}}{Identificação do paciente voluntário.} \item{\code{volunt}}{Identificação do paciente voluntário.}
...@@ -11,39 +13,41 @@ ...@@ -11,39 +13,41 @@
\item{\code{period}}{Momento de avaliação: (1 = início do tratamento, \item{\code{period}}{Momento de avaliação: (1 = início do tratamento,
2 = após 3 meses e 3 = após 6 meses.} 2 = após 3 meses e 3 = após 6 meses.}
\item{\code{trat}}{Tipo de tratamento (1 = placebo, 2 = líquido A e \item{\code{trat}}{Tipo de tratamento (1 = placebo, 2 = líquido A e 3
3 = líquido B.} = líquido B.}
\item{\code{escore}}{Escore atribuído às placas dentárias.} \item{\code{escore}}{Escore atribuído às placas dentárias.}
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exemplo 5.5.3, pág. 390.
computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.3, pág. 390)
} }
\description{ \description{
Dados de um ensaio clínico realizado com 109 indivíduos, Dados de um ensaio clínico realizado com 109 indivíduos,
distribuídos de forma aleatória para receberem um líquido distribuídos de forma aleatória para receberem um líquido tipo A
tipo A (34 indivíduos), um líquido tipo B (36 indivíduos) ou um (34 indivíduos), um líquido tipo B (36 indivíduos) ou um líquido
líquido controle (39 indivíduos). Placas dentárias foram controle (39 indivíduos). Placas dentárias foram avaliadas e
avaliadas e classificadas segundo um escore no início do classificadas segundo um escore no início do tratamento, após 3 e
tratamento, após 3 e 6 meses. 6 meses.
} }
\examples{ \examples{
data(PaulaEg5.5.3) data(PaulaEg5.5.3)
str(PaulaEg5.5.3)
xtabs(~trat + period, data = PaulaEg5.5.3)
require(lattice) library(lattice)
xyplot(escore ~ period | trat, groups = volunt, xyplot(escore ~ period | trat, groups = volunt,
xlab = 'Período', ylab = 'Escore', type = c("p", "a"), xlab = "Período", ylab = "Escore", type = c("p", "a"),
data = PaulaEg5.5.3) data = PaulaEg5.5.3)
} }
\references{ \references{
Hadgu, A. e Koch, G. (1999). Application of generalized Hadgu, A. e Koch, G. (1999). Application of generalized
estimating equations to a dental randomized clinical trial. Journal estimating equations to a dental randomized clinical
of Biopharmaceutical Statistics 9, 161-178. trial. Journal of Biopharmaceutical Statistics 9, 161-178.
} }
\keyword{quase-verossimilhança} \keyword{longitudinal}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.19} \alias{PaulaEx1.13.19}
\title{Estudo Demogr\enc{á}{a}fico dos Estados Norte-Americanos} \title{Estudo Demogr\enc{á}{a}fico dos Estados Norte-Americanos}
\format{Um \code{data.frame} com 50 observações e 9 variáveis. \format{Um \code{data.frame} com 50 observações e 9 variáveis.
\describe{ \describe{
\item{\code{estado}}{Nome do estado.} \item{\code{estado}}{Nome do estado.}
...@@ -29,9 +30,7 @@ ...@@ -29,9 +30,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.19, pág. 109.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.19,
pág. 109)
} }
\description{ \description{
Dados referentes a um estudo demográfico sobre os 50 Dados referentes a um estudo demográfico sobre os 50
...@@ -54,5 +53,5 @@ scatterplotMatrix(~expvi + analf + crime + estud + ndias + dens, ...@@ -54,5 +53,5 @@ scatterplotMatrix(~expvi + analf + crime + estud + ndias + dens,
} }
\keyword{MLG} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.20} \alias{PaulaEx1.13.20}
\title{Vendas de Telhados de Madeira} \title{Vendas de Telhados de Madeira}
\format{Um \code{data.frame} com 26 observações e 5 variáveis. \format{Um \code{data.frame} com 26 observações e 5 variáveis.
\describe{ \describe{
\item{\code{gasto}}{Gasto com publicidade do produto (em mil \item{\code{gasto}}{Gasto com publicidade do produto (em mil
...@@ -22,26 +23,25 @@ ...@@ -22,26 +23,25 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.20, pág. 110.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.20,
pág. 110)
} }
\description{ \description{
Dados referentes a vendas de um tipo de telhado de madeira Dados referentes a vendas de um tipo de telhado de
em 26 filiais de uma rede de lojas de construção. Um dos objetivos do madeira em 26 filiais de uma rede de lojas de construção. Um dos
estudo é tentar prever o número esperado de telhados vendidos objetivos do estudo é tentar prever o número esperado de telhados
dadas as demais variáveis registradas. vendidos dadas as demais variáveis registradas.
} }
\examples{ \examples{
data(PaulaEx1.13.20)
data(PaulaEx1.13.20)
str(PaulaEx1.13.20) str(PaulaEx1.13.20)
library(lattice) library(lattice)
splom(PaulaEx1.13.20, splom(PaulaEx1.13.20,
type = c("p", "g", "smooth"), type = c("p", "g", "smooth"),
col.line = 1) col.line = 1)
} }
\keyword{TODO} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.21} \alias{PaulaEx1.13.21}
\title{N\enc{ú}{u}mero de Octanas na Produ\enc{çã}{ca}o de Gasolina} \title{N\enc{ú}{u}mero de Octanas na Produ\enc{çã}{ca}o de Gasolina}
\format{Um \code{data.frame} com 82 observações e 5 variáveis. \format{Um \code{data.frame} com 82 observações e 5 variáveis.
\describe{ \describe{
\item{\code{x1}}{Variável não nomeada. Imagina-se que se tenha \item{\code{x1}}{Variável não nomeada. Imagina-se que se tenha
...@@ -22,9 +23,7 @@ ...@@ -22,9 +23,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.21, pág. 110.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.21,
pág. 110)
} }
\description{ \description{
Dados referentes à produção de gasolina numa determinada Dados referentes à produção de gasolina numa determinada
...@@ -34,15 +33,16 @@ Dados referentes à produção de gasolina numa determinada ...@@ -34,15 +33,16 @@ Dados referentes à produção de gasolina numa determinada
produzida. produzida.
} }
\examples{ \examples{
data(PaulaEx1.13.21)
data(PaulaEx1.13.21)
str(PaulaEx1.13.21) str(PaulaEx1.13.21)
library(lattice) library(lattice)
splom(PaulaEx1.13.21, splom(PaulaEx1.13.21,
type = c("p", "g", "smooth"), type = c("p", "g", "smooth"),
col.line = 1) col.line = 1)
} }
\keyword{TODO} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.22} \alias{PaulaEx1.13.22}
\title{Vendas de Im\enc{ó}{o}veis} \title{Vendas de Im\enc{ó}{o}veis}
\format{Um \code{data.frame} com 27 observações e 5 variáveis. \format{Um \code{data.frame} com 27 observações e 5 variáveis.
\describe{ \describe{
\item{\code{impos}}{Valor cobrado de imposto, em 100 dólares.} \item{\code{impos}}{Valor cobrado de imposto, em 100 dólares.}
...@@ -18,9 +19,7 @@ ...@@ -18,9 +19,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.22, pág. 111.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.22,
pág. 111)
} }
\description{ \description{
Dados relativos a uma amostra de 27 imóveis vendidos. Os Dados relativos a uma amostra de 27 imóveis vendidos. Os
...@@ -28,15 +27,16 @@ Dados relativos a uma amostra de 27 imóveis vendidos. Os ...@@ -28,15 +27,16 @@ Dados relativos a uma amostra de 27 imóveis vendidos. Os
no preço de venda de um imóvel. no preço de venda de um imóvel.
} }
\examples{ \examples{
data(PaulaEx1.13.22)
data(PaulaEx1.13.22)
str(PaulaEx1.13.22) str(PaulaEx1.13.22)
library(lattice) library(lattice)
splom(PaulaEx1.13.22, splom(PaulaEx1.13.22,
type = c("p", "g", "smooth"), type = c("p", "g", "smooth"),
col.line = 1) col.line = 1)
} }
\keyword{TODO} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.23} \alias{PaulaEx1.13.23}
\title{Di\enc{â}{a}metro de Cerejeiras da Pensilv\enc{â}{a}nia} \title{Di\enc{â}{a}metro de Cerejeiras da Pensilv\enc{â}{a}nia}
\format{Um \code{data.frame} com 31 observações e 3 variáveis. \format{Um \code{data.frame} com 31 observações e 3 variáveis.
\describe{ \describe{
\item{\code{diam}}{Diâmetro da cerejeira, em polegadas. Provavelmente \item{\code{diam}}{Diâmetro da cerejeira, em polegadas. Provavelmente
...@@ -16,9 +17,7 @@ ...@@ -16,9 +17,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.23, pág. 111.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.23,
pág. 111)
} }
\description{ \description{
Dados referentes ao registro das variáveis diâmetro, Dados referentes ao registro das variáveis diâmetro,
...@@ -27,15 +26,16 @@ Dados referentes ao registro das variáveis diâmetro, ...@@ -27,15 +26,16 @@ Dados referentes ao registro das variáveis diâmetro,
árvore a partir de sua altura e diâmetro. árvore a partir de sua altura e diâmetro.
} }
\examples{ \examples{
data(PaulaEx1.13.23)
data(PaulaEx1.13.23)
str(PaulaEx1.13.23) str(PaulaEx1.13.23)
library(lattice) library(lattice)
splom(PaulaEx1.13.23, splom(PaulaEx1.13.23,
type = c("p", "g", "smooth"), type = c("p", "g", "smooth"),
lwd = 2, col.line = 1) lwd = 2, col.line = 1)
} }
\keyword{TODO} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.24} \alias{PaulaEx1.13.24}
\title{Porcentagens de Retorno de A\enc{çõ}{co}es} \title{Porcentagens de Retorno de A\enc{çõ}{co}es}
\format{Um \code{data.frame} com 311 observações e 5 variáveis. \format{Um \code{data.frame} com 311 observações e 5 variáveis.
\describe{ \describe{
\item{\code{tbill}}{Taxa de retorno livre de risco.} \item{\code{tbill}}{Taxa de retorno livre de risco.}
...@@ -20,9 +21,7 @@ ...@@ -20,9 +21,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercicío 1.13.24, pág. 112.
computacional. São Paulo, SP: IME-USP. (Exercicío 1.13.24,
pág. 112)
} }
\description{ \description{
Dados referentes aos retornos diários das ações das Dados referentes aos retornos diários das ações das
...@@ -32,15 +31,17 @@ Dados referentes aos retornos diários das ações das ...@@ -32,15 +31,17 @@ Dados referentes aos retornos diários das ações das
mercado, para padronizar as comparações. mercado, para padronizar as comparações.
} }
\examples{ \examples{
data(PaulaEx1.13.24)
data(PaulaEx1.13.24)
str(PaulaEx1.13.24) str(PaulaEx1.13.24)
library(reshape) library(reshape)
da <- melt(PaulaEx1.13.24, measure.vars = c("micro", "ge", "ford"), da <- melt(PaulaEx1.13.24, measure.vars = c("micro", "ge", "ford"),
variable_name = "empresa") variable_name = "empresa")
library(lattice) library(lattice)
densityplot(~value, groups = empresa, data = da, densityplot(~value, groups = empresa, data = da,
auto.key = list(corner = c(0.9, 0.9))) auto.key = list(corner = c(0.9, 0.9)))
...@@ -48,5 +49,5 @@ xyplot((sp500 - tbill) ~ (value - tbill) | empresa, ...@@ -48,5 +49,5 @@ xyplot((sp500 - tbill) ~ (value - tbill) | empresa,
data = da, type = c("p", "smooth", "g")) data = da, type = c("p", "smooth", "g"))
} }
\keyword{TODO} \keyword{RM}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx1.13.25} \alias{PaulaEx1.13.25}
\title{Venda de Im\enc{ó}{o}veis em Eugene, Estatdos Unidos} \title{Venda de Im\enc{ó}{o}veis em Eugene, Estatdos Unidos}
\format{Um \code{data.frame} com 50 observações e 2 variáveis. \format{Um \code{data.frame} com 50 observações e 2 variáveis.
\describe{ \describe{
\item{\code{area}}{Área total do imóvel, em pés quadrados.} \item{\code{area}}{Área total do imóvel, em pés quadrados.}
...@@ -12,9 +13,7 @@ ...@@ -12,9 +13,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 1.13.25, pág. 112.
computacional. São Paulo, SP: IME-USP. (Exercício 1.13.25,
pág. 112)
} }
\description{ \description{
Dados de um estudo cujo objetivo foi tentar prever o Dados de um estudo cujo objetivo foi tentar prever o
...@@ -23,11 +22,12 @@ Dados de um estudo cujo objetivo foi tentar prever o ...@@ -23,11 +22,12 @@ Dados de um estudo cujo objetivo foi tentar prever o
de venda registrados. de venda registrados.
} }
\examples{ \examples{
data(PaulaEx1.13.25)
data(PaulaEx1.13.25)
str(PaulaEx1.13.25) str(PaulaEx1.13.25)
library(lattice) library(lattice)
xyplot(preco ~ area, data = PaulaEx1.13.25, xyplot(preco ~ area, data = PaulaEx1.13.25,
type = c("p", "smooth", "g")) type = c("p", "smooth", "g"))
......
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx2.10.15} \alias{PaulaEx2.10.15}
\title{Consumo de Energia em Domic\enc{í}{i}lios} \title{Consumo de Energia em Domic\enc{í}{i}lios}
\format{Um \code{data.frame} com 53 observações e 2 variáveis. \format{Um \code{data.frame} com 53 observações e 2 variáveis.
\describe{ \describe{
\item{\code{consu}}{Consumo de energia num determinado mês, em \item{\code{consu}}{Consumo de energia num determinado mês, em
...@@ -14,20 +15,19 @@ ...@@ -14,20 +15,19 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 2.10.15, pág. 178.
computacional. São Paulo, SP: IME-USP. (Exercício 2.10.15,
pág. 178)
} }
\description{ \description{
Dados referentes ao consumo de energia em 53 domicílios Dados referentes ao consumo de energia em 53 domicílios
e demanda de energia no horário de pico. e demanda de energia no horário de pico.
} }
\examples{ \examples{
data(PaulaEx2.10.15)
data(PaulaEx2.10.15)
str(PaulaEx2.10.15) str(PaulaEx2.10.15)
library(lattice) library(lattice)
xyplot(deman ~ consu, data = PaulaEx2.10.15, xyplot(deman ~ consu, data = PaulaEx2.10.15,
pch = 19, lwd = 2, type = c("p", "g", "smooth")) pch = 19, lwd = 2, type = c("p", "g", "smooth"))
...@@ -37,5 +37,6 @@ Montgomery, D. C., Peck, E. A., Vining, ...@@ -37,5 +37,6 @@ Montgomery, D. C., Peck, E. A., Vining,
G. G. (2001). Introduction to Linear Regression Analysis (3rd G. G. (2001). Introduction to Linear Regression Analysis (3rd
Ed.). John Wiley, New York. Ed.). John Wiley, New York.
} }
\keyword{positivo-assimétrico} \keyword{RS}
\keyword{heterovar}
...@@ -2,8 +2,10 @@ ...@@ -2,8 +2,10 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx2.10.16} \name{PaulaEx2.10.16}
\alias{PaulaEx2.10.16} \alias{PaulaEx2.10.16}
\title{Rela\enc{çã}{ca}o entre Publicidade e Faturamento em Restaurantes} \title{Rela\enc{çã}{ca}o entre Publicidade e Faturamento em
Restaurantes}
\format{Um \code{data.frame} com 30 observações e 2 variáveis. \format{Um \code{data.frame} com 30 observações e 2 variáveis.
\describe{ \describe{
\item{\code{fatura}}{Faturamento anual do restaurante, em mil \item{\code{fatura}}{Faturamento anual do restaurante, em mil
...@@ -14,9 +16,7 @@ ...@@ -14,9 +16,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 2.10.16, pág. 179.
computacional. São Paulo, SP: IME-USP. (Exercício 2.10.16,
pág. 179)
} }
\description{ \description{
Dados referentes a faturamentos anuais e gastos com Dados referentes a faturamentos anuais e gastos com
...@@ -25,11 +25,12 @@ Dados referentes a faturamentos anuais e gastos com ...@@ -25,11 +25,12 @@ Dados referentes a faturamentos anuais e gastos com
publicidade. publicidade.
} }
\examples{ \examples{
data(PaulaEx2.10.16)
data(PaulaEx2.10.16)
str(PaulaEx2.10.16) str(PaulaEx2.10.16)
library(lattice) library(lattice)
xyplot(fatura ~ gastos, xyplot(fatura ~ gastos,
data = PaulaEx2.10.16, data = PaulaEx2.10.16,
type = c("p", "g", "smooth")) type = c("p", "g", "smooth"))
...@@ -41,5 +42,4 @@ Montgomery, D. C., Peck, E. A., Vining, ...@@ -41,5 +42,4 @@ Montgomery, D. C., Peck, E. A., Vining,
Ed.). John Wiley, New York. Ed.). John Wiley, New York.
} }
\keyword{RS} \keyword{RS}
\keyword{positivo-assimétrico}
...@@ -4,11 +4,12 @@ ...@@ -4,11 +4,12 @@
\alias{PaulaEx2.10.17} \alias{PaulaEx2.10.17}
\title{Qualidade de Filme em M\enc{á}{a}quinas Fotogr\enc{á}{a}ficas} \title{Qualidade de Filme em M\enc{á}{a}quinas Fotogr\enc{á}{a}ficas}
\format{Um \code{data.frame} com 21 observações e 3 variáveis. \format{Um \code{data.frame} com 21 observações e 3 variáveis.
\describe{ \describe{
\item{\code{temp}}{Fator com três níveis que indicam a condição \item{\code{temp}}{Fator com três níveis que indicam a condição
experimental do filme (temperaturas \code{72ºC}, \code{82ºC} e experimental do filme (temperaturas 72\eqn{^\circ}C,
\code{92ºC}).} 82\eqn{^\circ}C e 92\eqn{^\circ}C).}
\item{\code{dmax}}{Valor da densidade máxima do filme (unidade de \item{\code{dmax}}{Valor da densidade máxima do filme (unidade de
medida não informada).} medida não informada).}
...@@ -17,24 +18,26 @@ ...@@ -17,24 +18,26 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 2.10.17, pág. 179.
computacional. São Paulo, SP: IME-USP. (Exercício 2.10.17,
pág. 179)
} }
\description{ \description{
Dados provenientes de um experimento cujo objetivo foi Dados provenientes de um experimento cujo objetivo foi
avaliar a qualidade de determinado filme utilizado em máquinas avaliar a qualidade de determinado filme utilizado em máquinas
fotográficas sob três condições experimentais (relacionadas à fotográficas sob três condições experimentais (relacionadas à
temperatura do filme). Para tal avaliação considerou-se a temperatura do filme). Para tal avaliação considerou-se a
variável tempo de duração do filme como a resposta e a variável tempo de duração do filme como a resposta e a densidade
densidade máxima do filme como variável de controle. máxima do filme como variável de controle.
} }
\examples{ \examples{
data(PaulaEx2.10.17)
data(PaulaEx2.10.17)
str(PaulaEx2.10.17) str(PaulaEx2.10.17)
library(lattice) library(lattice)
xyplot(tempo ~ dmax | temp, type = c("p", "r"),
data = PaulaEx2.10.17)
xyplot(tempo ~ dmax, xyplot(tempo ~ dmax,
groups = temp, groups = temp,
data = PaulaEx2.10.17, data = PaulaEx2.10.17,
...@@ -43,8 +46,8 @@ xyplot(tempo ~ dmax, ...@@ -43,8 +46,8 @@ xyplot(tempo ~ dmax,
corner = c(0.95, 0.95), corner = c(0.95, 0.95),
lines = TRUE, lines = TRUE,
cex.title = 1, cex.title = 1,
title = "Temperatura" title = "Temperatura"),
), panel = function(x, y, ...){ panel = function(x, y, ...){
panel.xyplot(x, y, ...) panel.xyplot(x, y, ...)
panel.loess(x, y, col = 1, ...) panel.loess(x, y, col = 1, ...)
}) })
...@@ -55,5 +58,6 @@ Myers, R. H., Montgomery, D. C., Vining, ...@@ -55,5 +58,6 @@ Myers, R. H., Montgomery, D. C., Vining,
G. G. (2002). Generalized Linear Models: With Applications in G. G. (2002). Generalized Linear Models: With Applications in
Engineering and the Sciences. John Wiley, New York. Engineering and the Sciences. John Wiley, New York.
} }
\keyword{positivo-assimétrico} \keyword{RS}
\keyword{dummy}
...@@ -2,13 +2,13 @@ ...@@ -2,13 +2,13 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx2.10.19} \name{PaulaEx2.10.19}
\alias{PaulaEx2.10.19} \alias{PaulaEx2.10.19}
\title{Estudo Sobre Leucemia e Caracter\enc{í}{i}stica Morfol\enc{ó}{o}gica nas C\enc{é}{e}lulas \title{Estudo Sobre Leucemia e Caracter\enc{í}{i}stica
Brancas} Morfol\enc{ó}{o}gica nas C\enc{é}{e}lulas Brancas}
\format{Um \code{data.frame} com 32 observações e 3 variáveis. \format{Um \code{data.frame} com 32 observações e 3 variáveis.
\describe{ \describe{
\item{\code{ncel}}{Número de células brancas \item{\code{ncel}}{Número de células brancas na amostra do paciente.}
na amostra do paciente.}
\item{\code{carac}}{Fator com dois níveis que representa a presença \item{\code{carac}}{Fator com dois níveis que representa a presença
(\code{AG positivo}) ou ausência (\code{AG negativo}) da (\code{AG positivo}) ou ausência (\code{AG negativo}) da
...@@ -18,9 +18,7 @@ ...@@ -18,9 +18,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exemplo 2.10.19, pág. 180.
computacional. São Paulo, SP: IME-USP. (Exemplo 2.10.19,
pág. 180)
} }
\description{ \description{
Dados provenientes de um estudo em que pacientes com Dados provenientes de um estudo em que pacientes com
...@@ -30,11 +28,12 @@ Dados provenientes de um estudo em que pacientes com ...@@ -30,11 +28,12 @@ Dados provenientes de um estudo em que pacientes com
tempo de sobrevivência dos pacientes. tempo de sobrevivência dos pacientes.
} }
\examples{ \examples{
data(PaulaEx2.10.19)
data(PaulaEx2.10.19)
str(PaulaEx2.10.19) str(PaulaEx2.10.19)
library(latticeExtra) library(latticeExtra)
xyplot(tempo ~ ncel, xyplot(tempo ~ ncel,
groups = carac, groups = carac,
data = PaulaEx2.10.19, data = PaulaEx2.10.19,
...@@ -45,8 +44,7 @@ xyplot(tempo ~ ncel, ...@@ -45,8 +44,7 @@ xyplot(tempo ~ ncel,
corner = c(0.95, 0.95), corner = c(0.95, 0.95),
lines = TRUE, lines = TRUE,
cex.title = 1, cex.title = 1,
title = "Característica morfológica " title = "Característica morfológica"))
))
} }
\references{ \references{
...@@ -54,5 +52,7 @@ Feigl, P., Zelen, M. (1965). Estimation of exponential ...@@ -54,5 +52,7 @@ Feigl, P., Zelen, M. (1965). Estimation of exponential
survival probabilities with concomitant information. Biometrics survival probabilities with concomitant information. Biometrics
21, 826-838. 21, 826-838.
} }
\keyword{positivo-assimétrico} \keyword{RS}
\keyword{dummy}
\keyword{heterovar}
...@@ -4,6 +4,7 @@ ...@@ -4,6 +4,7 @@
\alias{PaulaEx2.10.20} \alias{PaulaEx2.10.20}
\title{Estudo de Ap\enc{ó}{o}lices de Seguros de Ve\enc{í}{i}culos} \title{Estudo de Ap\enc{ó}{o}lices de Seguros de Ve\enc{í}{i}culos}
\format{Um \code{data.frame} com 996 observações e 9 variáveis. \format{Um \code{data.frame} com 996 observações e 9 variáveis.
\describe{ \describe{
\item{\code{valorv}}{Valor do veículo, em dez mil dólares \item{\code{valorv}}{Valor do veículo, em dez mil dólares
...@@ -32,9 +33,8 @@ ...@@ -32,9 +33,8 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 2.10.20, pág. 181; exercício 5.6.3,
computacional. São Paulo, SP: IME-USP. (Exercício 2.10.20, pág. 396.
pág. 181; exercício 5.6.3, pág. 396)
} }
\description{ \description{
Dados de uma amostra aleatória de 996 apólices de Dados de uma amostra aleatória de 996 apólices de
...@@ -48,8 +48,8 @@ Dados de uma amostra aleatória de 996 apólices de ...@@ -48,8 +48,8 @@ Dados de uma amostra aleatória de 996 apólices de
informações do veículo e do principal condutor). informações do veículo e do principal condutor).
} }
\examples{ \examples{
data(PaulaEx2.10.20)
data(PaulaEx2.10.20)
str(PaulaEx2.10.20) str(PaulaEx2.10.20)
# Variável de interesse - custo médio de um sinistro # Variável de interesse - custo médio de um sinistro
...@@ -65,6 +65,7 @@ sapply(PaulaEx2.10.20[, !index], function(x) plot(table(x))) ...@@ -65,6 +65,7 @@ sapply(PaulaEx2.10.20[, !index], function(x) plot(table(x)))
# Dispersão das variáveis numéricas # Dispersão das variáveis numéricas
library(lattice) library(lattice)
splom(PaulaEx2.10.20[, index], splom(PaulaEx2.10.20[, index],
type = c("p", "g", "smooth"), type = c("p", "g", "smooth"),
lwd = 2, col.line = 1) lwd = 2, col.line = 1)
...@@ -75,6 +76,6 @@ De Jong, P., Heller, G. Z. (2008). Generalized linear ...@@ -75,6 +76,6 @@ De Jong, P., Heller, G. Z. (2008). Generalized linear
models for insurance data (Vol. 136). Cambridge: Cambridge models for insurance data (Vol. 136). Cambridge: Cambridge
University Press. University Press.
} }
\keyword{positivo-assimétrico} \keyword{RM}
\keyword{quase-verossimilhança} \keyword{contagem}
...@@ -2,8 +2,10 @@ ...@@ -2,8 +2,10 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx2.10.7} \name{PaulaEx2.10.7}
\alias{PaulaEx2.10.7} \alias{PaulaEx2.10.7}
\title{Resist\enc{ê}{e}ncia de Vidros sob Efeito de Voltagem e Temperatura} \title{Resist\enc{ê}{e}ncia de Vidros sob Efeito de Voltagem e
Temperatura}
\format{Um \code{data.frame} com 32 observações e 3 variáveis. \format{Um \code{data.frame} com 32 observações e 3 variáveis.
\describe{ \describe{
\item{\code{tempo}}{Tempo de resistência do vidro, mensurado em \item{\code{tempo}}{Tempo de resistência do vidro, mensurado em
...@@ -17,9 +19,7 @@ ...@@ -17,9 +19,7 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 2.10.7, pág. 175.
computacional. São Paulo, SP: IME-USP. (Exercício 2.10.7,
pág. 175)
} }
\description{ \description{
Resultados de um experimento em que a resistência de um Resultados de um experimento em que a resistência de um
...@@ -29,11 +29,14 @@ Resultados de um experimento em que a resistência de um ...@@ -29,11 +29,14 @@ Resultados de um experimento em que a resistência de um
e temperatura.) e temperatura.)
} }
\examples{ \examples{
data(PaulaEx2.10.7)
data(PaulaEx2.10.7)
str(PaulaEx2.10.7) str(PaulaEx2.10.7)
xtabs(~volt + temp, data = PaulaEx2.10.7)
library(lattice) library(lattice)
xyplot(tempo ~ volt, xyplot(tempo ~ volt,
groups = temp, groups = temp,
data = PaulaEx2.10.7, data = PaulaEx2.10.7,
...@@ -71,5 +74,5 @@ xyplot(tempo[, "C.Variação"] ~ factor(trat), ...@@ -71,5 +74,5 @@ xyplot(tempo[, "C.Variação"] ~ factor(trat),
Lawless, J. F. (1982). Statistical Models and Methods for Lawless, J. F. (1982). Statistical Models and Methods for
Lifetime Data. John Wiley, New York. Lifetime Data. John Wiley, New York.
} }
\keyword{positivos-assimétricos} \keyword{FAT2}
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx3.7.14} \name{PaulaEx3.7.14}
\alias{PaulaEx3.7.14} \alias{PaulaEx3.7.14}
\title{Confiabilidade de equipamentos} \title{Confiabilidade de Equipamentos}
\format{Um \code{data.frame} com 4 variáveis. \format{Um \code{data.frame} com 4 variáveis.
\describe{ \describe{
...@@ -11,40 +11,44 @@ ...@@ -11,40 +11,44 @@
\item{\code{equip}}{Tipo de equipamento (A, B ou C).} \item{\code{equip}}{Tipo de equipamento (A, B ou C).}
\item{\code{nit}}{Número de equipamentos que não falharam até o tempo t, \item{\code{nit}}{Número de equipamentos que não falharam até o tempo
t = 1,2,3,4,5.} t, t = 1,2,3,4,5.}
\item{\code{yit}}{Número de falhas no intervalo entre os tempos t-1 e t.} \item{\code{yit}}{Número de falhas no intervalo entre os tempos t-1 e
t.}
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 3.7.14, página 272.
computacional. São Paulo, SP: IME-USP.
(Exercício 3.7.14, página 272)
} }
\description{ \description{
Dados referentes aos tempos de falhas de equipamentos. Dados referentes aos tempos de falhas de equipamentos.
} }
\examples{ \examples{
require(lattice) library(lattice)
data(PaulaEx3.7.14) data(PaulaEx3.7.14)
str(PaulaEx3.7.14)
PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp) PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp)
xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", xyplot(nit ~ temp,
auto.key = TRUE, xlab = "Tempos", groups = equip,
ylab = "N° de equipamentos operantes", data = PaulaEx3.7.14,
main = "Confiabilidade dos equipamentos") type = "o",
auto.key = TRUE,
xlab = "Tempos",
ylab = "Número de equipamentos operantes")
} }
\references{ \references{
Lawless, J. F. (1982). Statistical Models and Methods for Lawless, J. F. (1982). Statistical Models and Methods for
Lifetime Data. John Wiley & Sons, New York. (Página 389) Lifetime Data. John Wiley & Sons, New York. (Página 389)
Efron, B. (1988). Logistic regression, survival analysis, Efron, B. (1988). Logistic regression, survival analysis,
and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83. and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83. (Páginas
(Páginas 414-425) 414-425)
} }
\keyword{RLAS} \keyword{sobrevivência}
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx3.7.15} \name{PaulaEx3.7.15}
\alias{PaulaEx3.7.15} \alias{PaulaEx3.7.15}
\title{Tumor benigno na mama} \title{Tumor Benigno na Mama}
\format{Um \code{data.frame} com 100 observações e 14 variáveis. \format{Um \code{data.frame} com 100 observações e 14 variáveis.
\describe{ \describe{
...@@ -11,14 +11,16 @@ ...@@ -11,14 +11,16 @@
\item{\code{obs}}{Observação (1 = caso, 2 = controle).} \item{\code{obs}}{Observação (1 = caso, 2 = controle).}
\item{\code{idade}}{Idade do paciente no momento da entrevista (em anos).} \item{\code{idade}}{Idade do paciente no momento da entrevista (em
anos).}
\item{\code{diag}}{Diagnóstico (1:caso, 0:controle).} \item{\code{diag}}{Diagnóstico (1:caso, 0:controle).}
\item{\code{tesc}}{Tempo de escolaridade (em anos).} \item{\code{tesc}}{Tempo de escolaridade (em anos).}
\item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, \item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo
2 = técnico, 3 = universitário, 4 = mestrado, 5 = doutorado).} grau, 2 = técnico, 3 = universitário, 4 = mestrado, 5 =
doutorado).}
\item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).} \item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).}
...@@ -34,46 +36,43 @@ ...@@ -34,46 +36,43 @@
\item{\code{iupmen}}{Idade do último período menstrual.} \item{\code{iupmen}}{Idade do último período menstrual.}
\item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, \item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 =
4 = viúva, 5 = solteira).} separada, 4 = viúva, 5 = solteira).}
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 3.7.14, pág. 273.
computacional. São Paulo, SP: IME-USP. (Exercício 3.7.14, pág. 273)
} }
\description{ \description{
Estudo de caso-controle com emparelhamentos do tipo 1:1, Estudo de caso-controle com emparelhamentos do tipo 1:1,
em que os casos foram mulheres com diagnóstico confirmado de tumor em que os casos foram mulheres com diagnóstico confirmado de
benigno na mama. Os controles foram mulheres sadias diagnosticadas no tumor benigno na mama. Os controles foram mulheres sadias
mesmo hospital e período dos casos. diagnosticadas no mesmo hospital e período dos casos.
} }
\examples{ \examples{
data(PaulaEx3.7.15) data(PaulaEx3.7.15)
# Transformar variáveis
str(PaulaEx3.7.15) str(PaulaEx3.7.15)
# Transformar variáveis
PaulaEx3.7.15 <- transform( PaulaEx3.7.15 <- transform(
PaulaEx3.7.15, PaulaEx3.7.15,
PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est), PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est),
PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag), PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag),
PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur), PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur),
PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec) PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec))
)
# Libra para Kg # Libra para Kg
PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592
pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens
+ numab + numfi + peso + idupmens + ec, + numab + numfi + peso + idupmens + ec,
data = PaulaEx3.7.15, data = PaulaEx3.7.15)
main = "Matriz de gráficos de dispersão - tumor benigno na mama")
} }
\references{ \references{
Hosmer, D. W. e Lemeshow, S. (1989). Hosmer, D. W. e Lemeshow, S. (1989). Applied Logistic
Applied Logistic Regression. John Wiley, New York. (Capítulo.7) Regression. John Wiley, New York. (Capítulo.7)
} }
\keyword{RL} \keyword{RM}
...@@ -2,13 +2,13 @@ ...@@ -2,13 +2,13 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx3.7.16} \name{PaulaEx3.7.16}
\alias{PaulaEx3.7.16} \alias{PaulaEx3.7.16}
\title{Experimento de toxicidade} \title{Experimento de Toxicidade}
\format{Um \code{data.frame} com 4 variáveis. \format{Um \code{data.frame} com 4 variáveis.
\describe{ \describe{
\item{\code{conc}}{Concentração (R = rotenine, \item{\code{conc}}{Concentração (R = rotenine, D = deguelin e M =
D = deguelin e M = mistura).} mistura).}
\item{\code{dose}}{Dose aplicada da concentração.} \item{\code{dose}}{Dose aplicada da concentração.}
...@@ -18,30 +18,34 @@ D = deguelin e M = mistura).} ...@@ -18,30 +18,34 @@ D = deguelin e M = mistura).}
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 3.7.14, pág. 274 e 275.
computacional. São Paulo, SP: IME-USP.
(Exercício 3.7.14, pág. 274 e 275)
} }
\description{ \description{
Estudo que descreve os resultados de um Estudo que descreve os resultados de um experimento em
experimento em que a toxicidade de três concentrações (rotenine, que a toxicidade de três concentrações (rotenine, deguelin e
deguelin e mistura, essa última como uma mistura das duas pri- mistura, essa última como uma mistura das duas pri- meiras) é
meiras) é investigada. As concentrações foram testadas em insetos e investigada. As concentrações foram testadas em insetos e
observado, para cada dose, o número de insetos mortos. observado, para cada dose, o número de insetos mortos.
} }
\examples{ \examples{
data(PaulaEx3.7.16) data(PaulaEx3.7.16)
str(PaulaEx3.7.16)
require(lattice) library(lattice)
xyplot(mort/exp ~ dose,
groups = conc,
data = PaulaEx3.7.16,
type = "o",
auto.key = TRUE,
ylab = "Proporção de insetos mortos",
xlab = "Dose")
xyplot(mort/exp ~ dose, groups = conc, data = PaulaEx3.7.16, type = 'o',
auto.key = TRUE, ylab = "Proporção de insetos mortos",
xlab = "Dose", main = "Sobrevivência dos insetos expostos a toxina")
} }
\references{ \references{
Morgan, B. J. T. (1992). Analysis of Quantal Response Data. Morgan, B. J. T. (1992). Analysis of Quantal Response
Chapman and Hall, London. (Página 90) Data. Chapman and Hall, London. (Página 90)
} }
\keyword{binomial} \keyword{binomial}
...@@ -2,7 +2,7 @@ ...@@ -2,7 +2,7 @@
% Please edit documentation in R/Paula.R % Please edit documentation in R/Paula.R
\name{PaulaEx3.7.19} \name{PaulaEx3.7.19}
\alias{PaulaEx3.7.19} \alias{PaulaEx3.7.19}
\title{Gestantes fumantes} \title{Gestantes Fumantes}
\format{Um \code{data.frame} com 5 variáveis. \format{Um \code{data.frame} com 5 variáveis.
\describe{ \describe{
...@@ -20,20 +20,20 @@ ...@@ -20,20 +20,20 @@
}} }}
\source{ \source{
Paula, G. A. (2004). Modelos de regressão: com apoio PAULA (2004), Exercício 3.7.19, página 276.
computacional. São Paulo, SP: IME-USP.
(Exercício 3.7.19, página 276)
} }
\description{ \description{
Estudo com gestantes fumantes, no qual as participantes Estudo com gestantes fumantes, no qual as participantes
foram classificadas segundo os fatores de idade, número de cigarros foram classificadas segundo os fatores de idade, número de
consumidos, tempo de gestação, e a condição (sobrevivência) da criança. cigarros consumidos, tempo de gestação, e a condição
(sobrevivência) da criança.
} }
\examples{ \examples{
data(PaulaEx3.7.19) data(PaulaEx3.7.19)
str(PaulaEx3.7.19)
require(vcd) library(vcd)
# Paciente que sobreviveram # Paciente que sobreviveram
ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19) ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19)
...@@ -52,10 +52,11 @@ mosaic(ns, ...@@ -52,10 +52,11 @@ mosaic(ns,
labeling_args = list( labeling_args = list(
set_varnames = c(ncigar = "Número de cigarros", set_varnames = c(ncigar = "Número de cigarros",
tgest = "Tempo de gestação"))) tgest = "Tempo de gestação")))
} }
\references{ \references{
Agresti A. (1990). Categorical Data Analysis. John Wiley, Agresti A. (1990). Categorical Data Analysis. John Wiley,
New York. (página 253)) New York. (página 253))
} }
\keyword{ML} \keyword{contingência}