Initial commit of 4 R scripts and the 4 resulting png files