Update run_analysis.R

updates file extension to txt from csv