Update run_analysis.R

changed the directory