Create plot1.R

R script for producing plot1.png file. Part of Project 1 for the Exploratory Data Analysis course run by Roger Peng.