Created the .png file and R-script to plot the graph