First commit. Making R script edits.