Updated startup with ggplot2 functions