Update run_analysis.R

Minor typo - fixes