Update run_analysis.R

Added "Write.table" function if wanted to have a local copy "tidyData.txt"