added more comments in the run_analysis.R script