Update run_analysis.R

Added Tidy Data set being written to.txt file