# NOT RUN {
data(HeliumFootballs)
gf_point(helium ~ air, data = HeliumFootballs)
gf_dhistogram(
~ (helium - air), data = HeliumFootballs,
fill = ~ (helium > air), bins = 15, boundary = 0
)
# }
Run the code above in your browser using DataLab