Update run_analysis.R

Made sure data is written with no row names.