Data from Koch & Edwards (1988) from a double-blind clinical trial
investigating a new treatment for rheumatoid arthritis.
Usage
data("Arthritis")
Arguments
source
Michael Friendly (2000),
Visualizing Categorical Data:
http://euclid.psych.yorku.ca/ftp/sas/vcd/catdata/arthrit.sas
References
G. Koch & S. Edwards (1988),
Clinical efficiency trials with categorical data.
In K. E. Peace (ed.), Biopharmaceutical Statistics for Drug
Development, 403--451.
Marcel Dekker, New York.
M. Friendly (2000),
Visualizing Categorical Data.
SAS Institute, Cary, NC.
data("Arthritis")
art <- xtabs(~ Treatment + Improved, data = Arthritis, subset = Sex == "Female")
art
mosaic(art, gp = shading_Friendly)
mosaic(art, gp = shading_max)