Plot 1 for project 1
R code for Plot 2