labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source Examples

Dados provenientes de um estudo de acompanhamento de doutores Brit<c3><a2>nicos durante a d<c3><a9>cada de 50. Neste estudo observou-se a ocorr<c3><aa>ncia de mortes por c<c3><a2>ncer de pulm<c3><a3>o segundo o consumo m<c3><a9>dio di<c3><a1>rio de cigarro e a faixa-et<c3><a1>ria.

Um data.frame com 16 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis.

nmortes: N<c3><ba>mero de casos de morte por c<c3><a2>ncer de pulm<c3><a3>o.
tpessoas: Total de anos de exposi<c3><a7><c3><a3>o (somado para toda a amostra).
cmdc: Consumo m<c3><a9>dio di<c3><a1>rio de cigarros, dividido em quatro n<c3><ad>veis 0, 1-9, 10-30 ou +30 cigarros consumidos.
idade: Idade, registrada em faixas-et<c3><a1>rias de 40-49, 50-59, 60-79 e 70-80 anos.

PAULA (2004), Tabela 4.2, p<c3><a1>g. 294.

data(PaulaTb4.2)
str(PaulaTb4.2)

xtabs(nmortes ~ cmdc + idade, data = PaulaTb4.2)
(xt <- xtabs((nmortes/tpessoas)*100 ~ cmdc + idade,
             data = PaulaTb4.2))
plot(xt)

library(lattice)

xyplot((nmortes/tpessoas) * 100 ~ cmdc,
       xlab = "Consumo m<c3><a9>dio de cigarros",
       ylab = "Taxa de mortes por c<c3><a2>ncer de pulm<c3><a3>o",
       groups = idade,
       data = PaulaTb4.2,
       type = c("b", "g"),
       auto.key = list(corner = c(0.1, 0.9), cex.title = 1,
                       title = "Faixa-et<c3><a1>ria"))