Adding my versions of the four .R scripts and the four .png files