CoalMiners {vcd}R Documentation

Breathlessness and Wheeze in Coal Miners

Description

Data from Ashford & Snowden (1970) given by Agresti (1990) on the association between two pulmonary conditions, breathlessness and wheeze, in a large sample of coal miners.

Usage

data(CoalMiners)

Format

A 3-dimensional array resulting from cross-tabulating variables for 16,330 coal miners. The variables and their levels are as follows:

No Name Levels
1 Wheeze W, NoW
2 Breathlessness B, NoB
3 Age 25-29, 30-34, ..., 60-64

Source

Michael Friendly (2000), Visualizing Categorical Data, p. 82-83, 319-322.

References

A. Agresti (1990), Categorical Data Analysis. Wiley-Interscience, New York.

J. R. Ashford & R. D. Snowdon (1970), Multivariate probit analysis, Biometrics, 26, 535-546.

M. Friendly (2000), Visualizing Categorical Data. SAS Institute, Cary, NC.

Examples

data(CoalMiners)

## Fourfold display, both margins equated
fourfoldplot(CoalMiners, mfcol = c(2,4))

## Log Odds Ratio Plot
summary(l <- oddsratio(CoalMiners))
g <- seq(25, 60, by = 5)
plot(l,
     xlab = "Age Group",
     main = "Breathlessness and Wheeze in Coal Miners")
m <- lm(l ~ g + I(g^2))
lines(fitted(m), col = "red")

## Fourfold display, strata equated
fourfoldplot(CoalMiners, std = "ind.max", mfcol = c(2,4))

[Package vcd version 0.1-3.5 Index]