Initial upload of R code files and plot PNG