# NOT RUN {
airquality %>% cast_shadow(Ozone, Solar.R)
# }
# NOT RUN {
library(ggplot2)
library(magrittr)
airquality  %>%
  cast_shadow(Ozone,Solar.R) %>%
  ggplot(aes(x = Ozone,
             colour = Solar.R_NA)) +
        geom_density()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab