Add required 4 plots and R scripts to generate these plots