This is the runanalysis R code to clean up dataset for the project