Course Project 1

4 R scripts and 4 png graph