Edited files for assessment (changed ggplot to qplot)