Adding the four plots and the corresponding R scripts to re-create the plots