added additional comments to run_anlysis.R