Clean up plots.R, add boxplot code