Course work week 1

4 R files to create the 4 plots as in the assignment