commit 4 R scripts that create 4 png files