How the run_analysis.R code Works