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