added the R files for all 4 Plots