Getting and Cleaning Data Project

add run_analysis.R