Checking in R and png files for 4 plots