Create run_analysis.R

Has the code to run the whole process of tidying the data and extracting the data frame as needed.