Amendment of plot 4 R code and PNG file