Create plot1.R

Project 1, plot 1 - Histogram