PaulinoEx9.30: Avalia<c3><a7><c3><a3>o de Pol<c3><ad>ciais Militares

In pet-estatistica/labestData: Biblioteca de Dados para Aprendizado de Estatística

Description

Em um estudo sobre a avalia<c3><a7><c3><a3>o de pol<c3><ad>ciais militares brancos por soldados americanos negros na Segunda Guerra Mundial, os soldados do ex<c3><a9>rcito foram classificados segundo o n<c3><ad>vel educacional, a atitude face <c3><a0> separa<c3><a7><c3><a3>o racial, a regi<c3><a3>o de naturalidade e a prefer<c3><aa>ncia por miss<c3><b5>es de combate.

Format

Um data.frame com 24 observa<c3><a7><c3><b5>es e 5 vari<c3><a1>veis, em que

educ

N<c3><ad>vel educacional (s<c3><b3> grade school, alguma high school, high school completa).

sep

Atitude perante separa<c3><a7><c3><a3>o racial (n<c3><a3>o contra ou contra).

ntur

Regi<c3><a3>o de naturalidade (sul, norte).

missao

Prefer<c3><aa>ncia por miss<c3><a3>o de combate (sim ou n<c3><a3>o).

freq

Frequ<c3><aa>ncias observadas.

Source

PAULINO; SINGER (2006), Exerc<c3><ad>cio 9.30, p<c3><a1>g. 344.

Examples

data(PaulinoEx9.30)

str(PaulinoEx9.30)

xt <- xtabs(freq ~ ., data = PaulinoEx9.30)
ftable(xt)

library(lattice)
library(latticeExtra)

useOuterStrips(
    barchart(freq ~ educ | sep + natur, groups = missao,
             horizontal = FALSE,
             data = PaulinoEx9.30,
             auto.key = list(space = "top", columns = 2,
                             cex.title = 1, rectangles = TRUE,
                             points = FALSE,
                             title = "Prefer<c3><aa>ncia por miss<c3><a3>o"),
             xlab = "N<c3><ad>vel educacional",
             ylab = "Frequ<c3><aa>ncia")
)

pet-estatistica/labestData documentation built on May 25, 2019, 12:47 a.m.