Create plot1.r

R script to produce first plot of First Assignment for Coursera's Exploratory Analysis course