labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source References Examples

Ensaio cl<c3><ad>nico em que 20 pacientes com artrite foram aleatorizados, de modo que 10 receberam o medicamento auronofin e os outros 10 receberam placebo. S<c3><a3>o consideradas como vari<c3><a1>veis explicativas sexo e idade, al<c3><a9>m do tipo do tratamento. Os pacientes foram consultados e avaliados em 4 ocasi<c3><b5>es.

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

pacient: Identifica<c3><a7><c3><a3>o do paciente.
period: Momento em que o paciente foi avaliado (1 = in<c3><ad>cio do m<c3><aa>s, 2 = ap<c3><b3>s 1 m<c3><aa>s, 3 = ap<c3><b3>s 2 meses e 4 = ap<c3><b3>s 3 meses.
sexo: Sexo (1 = masculino e 0 = feminino).
idade: Idade (em anos).
trat: Tratamento aplicado placebo ou Auronofin).
result: Avalia<c3><a7><c3><a3>o do paciente classificada em bom e regular ou ruim.

PAULA (2004), Exerc<c3><ad>cio 5.6.14, p<c3><a1>g. 401.

Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). Generalized Linear Models: With Applications in Engineering and the Sciences. John Wiley, New York.

library(lattice)

data(PaulaEx5.6.15)
str(PaulaEx5.6.15)

tb <- xtabs(~result + trat + period, data = PaulaEx5.6.15)
barchart(tb,
         horizontal = FALSE,
         beside = FALSE,
         stack = FALSE,
         auto.key = list(space = "top", columns = 4, cex.title = 1,
                         rectangles = TRUE, points = FALSE,
                         title = "Per<c3><ad>odo"),
         scales = list(y = list(relation = "free"),
                       x = list(alternating = FALSE)),
         xlab = "Resultado",
         ylab = "Frequ<c3><aa>ncia absoluta")