added R scripts and image files for plots