Corrected bad plots in ggplot2 lecture