modify and upload run_analysis.R