R code and PNG plots for course project 1