restore R script and rename txt

txt files renamed.  R script was empty? WTF?