Improve plotting
Use dplyr for cleaner data cleaning
Better ggplot2 code