adding R script and notes