Add first R script and png file