more revisions to the run_analysis.R code