Update run_analysis.R

Added some clarifying comments