new files added 4 R scripts and 4 png file for the graph