plot1.R

Uses the datesOfInterest function to prepare data.
A histogram of the Global Active Power in kW is returned