bind_shadow(airquality)
# explore missing data visually
library(ggplot2)
# using the bounded shadow
ggplot(data = bind_shadow(airquality),
       aes(x = Ozone)) +
       geom_histogram() +
       facet_wrap(~Solar.R_NA,
       ncol = 1)
# using the is_na function
ggplot(data = airquality,
       aes(x = Ozone)) +
  geom_histogram() +
  facet_wrap(~is_na(Solar.R),
             ncol = 1)
Run the code above in your browser using DataLab