Update run_analysis.R

Use descriptive activity names