Revisions to "run analysis" R code file

Edits to make setwd() work on absolute references rather than relative.