Using R script, generate a tidy data set from data collected from the accelerometers from the Samsung Galaxy S smartphone