R code description for Run_analysis.R