Course Project 1

R script and the png plots