Sleuth2 (version 2.0-7)

case1101: Alcohol Metabolism in Men and Women

Description

These data were collected on 18 women and 14 men to investigate a certain theory on why women exhibit a lower tolerance for alcohol and develop alcohol--related liver disease more readily than men.

Usage

case1101

Format

A data frame with 32 observations on the following 5 variables.

Subject

subject number in the study

Metabol

first--pass metabolism of alcohol in the stomach (in mmol/liter-hour)

Gastric

gastric alcohol dehydrogenase activity in the stomach (in \(\mu\)mol/min/g of tissue)

Sex

sex of the subject

Alcohol

whether the subject is alcoholic or not

Examples

str(case1101)

plot(Metabol~Gastric, case1101,
     pch=ifelse(Sex=="Female", 19, 21),
     col=ifelse(Alcohol=="Alcoholic", "red", "green"))
legend(1,12, pch=c(19,21,19,21), col=c("green","green", "red", "red"),
             c("Non-alcoholic Females", "Non-alcoholic Males",
               "Alcoholic Females", "Alcoholic Males"))

library(lattice)
xyplot(Metabol~Gastric|Sex*Alcohol, case1101)
xyplot(Metabol~Gastric, case1101, groups=Sex:Alcohol,
        auto.key=list(x=0.2, y=0.8, corner=c(0,0), border=TRUE))