R code plot 1
Merge https://github.com/bank-i/ExData_Plotting1