Added header to run_analysis.R