Four R scripts to produce the 4 PNG plots