Update run_analysis.R

Added the code to compute the means and generate the new Tidy Data file with the means information