.R and .png files added for assignment