Added some comments to run_analysis.R