# NOT RUN {
if (require(mosaicData)) {
gf_bar( ~ substance, data = HELPrct)
gf_bar( ~ substance, data = HELPrct, fill = ~sex)
gf_bar( ~ substance, data = HELPrct, fill = ~sex, position = position_dodge())
# gf_counts() is another name for gf_bar()
gf_counts( ~ substance, data = HELPrct, fill = ~sex, position = position_dodge())
}
# }
Run the code above in your browser using DataLab