R code and PNG files were updated