Update run_analysis.R

The script to create the tidy data set and assignment points