The four plots

I committed the four R files and their corresponding png files in this
update