# NOT RUN {
data(Vanderpump)
require(moonBook)
mytable(vstatus ~ smoker, data = Vanderpump, show.total = TRUE)
mytable(vstatus + smoker ~ agegrp, data = Vanderpump, show.total = TRUE)
mhor(vstatus ~ agegrp/smoker, data = Vanderpump)
# }
Run the code above in your browser using DataLab