# NOT RUN {
options(scipen=8)
# Example taken from: SAS/STAT(R) 9.2 User's Guide, Second Edition, The FREQ Procedure
# http://support.sas.com/documentation/cdl/en/statugfreq/63124/PDF/default/statugfreq.pdf
# Hair-Eye-Color pp. 1816
tob <- as.table(matrix(c(
69, 28, 68, 51, 6,
69, 38, 55, 37, 0,
90, 47, 94, 94, 16
), nrow=3, byrow=TRUE,
dimnames=list(eye=c("blue","green","brown"),
hair=c("fair","red","medium","dark","black")) ))
Desc(tob)
Assocs(tob)
# Example taken from: http://www.math.wpi.edu/saspdf/stat/chap28.pdf
# pp. 1349
pain <- as.table(matrix(c(
26, 6,
26, 7,
23, 9,
18, 14,
9, 23
), ncol=2, byrow=TRUE))
Desc(pain)
Assocs(pain)
# }
Run the code above in your browser using DataLab