# NOT RUN {
gf_line()
if (require(mosaicData)) {
gf_point(age ~ sex, alpha = 0.25, data = HELPrct)
gf_point(births ~ date, color = ~wday, data = Births78)
# lines make the exceptions stand out more prominently
gf_line(births ~ date, color = ~wday, data = Births78)
}
# }
Run the code above in your browser using DataLab