Update run_analysis.R

Saving wrong file at the end