plots and corresponding R scripts

These are the requested plots and their R scripts that generate them