Added R Scripts and png outputs

Add 4 R scripts each of which produces a png image as  output.