Update run_analysis.R file to export final data as txt