Submitting Cousera Project 1. All plots.R