Cleanup of run_analysis.R and rerun of script