run_analysis.R

This R script reads downloaded data from: http://archive.ics.uci.edu/ml/machine-learning-databases/00240/UCI%20HAR%20Dataset.zip

The data set is described here: http://archive.ics.uci.edu/ml/datasets/Human+Activity+Recognition+Using+Smartphones

Once the data has been downloaded and extracted, set:
data_path <- "DIRECTORY EXTRACTED ZIP"

Then you can run the script that will create the file: tidy_data.txt in the directory specified above.

tidy_data.txt variables:##

The scritp will obtain all the mean and standard deviations from the motion sensors previously, and group them by the study subject and activity obtaining mean values.

The variables stored in tidy_data.txt are:

  • "Subject"
  • "Activity"
  • "tBodyAcc-mean()-X"
  • "tBodyAcc-mean()-Y"
  • "tBodyAcc-mean()-Z"
  • "tBodyAcc-std()-X"
  • "tBodyAcc-std()-Y"
  • "tBodyAcc-std()-Z"
  • "tGravityAcc-mean()-X"
  • "tGravityAcc-mean()-Y"
  • "tGravityAcc-mean()-Z"
  • "tGravityAcc-std()-X"
  • "tGravityAcc-std()-Y"
  • "tGravityAcc-std()-Z"
  • "tBodyAccJerk-mean()-X"
  • "tBodyAccJerk-mean()-Y"
  • "tBodyAccJerk-mean()-Z"
  • "tBodyAccJerk-std()-X"
  • "tBodyAccJerk-std()-Y"
  • "tBodyAccJerk-std()-Z"
  • "tBodyGyro-mean()-X"
  • "tBodyGyro-mean()-Y"
  • "tBodyGyro-mean()-Z"
  • "tBodyGyro-std()-X"
  • "tBodyGyro-std()-Y"
  • "tBodyGyro-std()-Z"
  • "tBodyGyroJerk-mean()-X"
  • "tBodyGyroJerk-mean()-Y"
  • "tBodyGyroJerk-mean()-Z"
  • "tBodyGyroJerk-std()-X"
  • "tBodyGyroJerk-std()-Y"
  • "tBodyGyroJerk-std()-Z"
  • "tBodyAccMag-mean()"
  • "tBodyAccMag-std()"
  • "tGravityAccMag-mean()"
  • "tGravityAccMag-std()"
  • "tBodyAccJerkMag-mean()"
  • "tBodyAccJerkMag-std()"
  • "tBodyGyroMag-mean()"
  • "tBodyGyroMag-std()"
  • "tBodyGyroJerkMag-mean()"
  • "tBodyGyroJerkMag-std()"
  • "fBodyAcc-mean()-X"
  • "fBodyAcc-mean()-Y"
  • "fBodyAcc-mean()-Z"
  • "fBodyAcc-std()-X"
  • "fBodyAcc-std()-Y"
  • "fBodyAcc-std()-Z"
  • "fBodyAcc-meanFreq()-X"
  • "fBodyAcc-meanFreq()-Y"
  • "fBodyAcc-meanFreq()-Z"
  • "fBodyAccJerk-mean()-X"
  • "fBodyAccJerk-mean()-Y"
  • "fBodyAccJerk-mean()-Z"
  • "fBodyAccJerk-std()-X"
  • "fBodyAccJerk-std()-Y"
  • "fBodyAccJerk-std()-Z"
  • "fBodyAccJerk-meanFreq()-X"
  • "fBodyAccJerk-meanFreq()-Y"
  • "fBodyAccJerk-meanFreq()-Z"
  • "fBodyGyro-mean()-X"
  • "fBodyGyro-mean()-Y"
  • "fBodyGyro-mean()-Z"
  • "fBodyGyro-std()-X"
  • "fBodyGyro-std()-Y"
  • "fBodyGyro-std()-Z"
  • "fBodyGyro-meanFreq()-X"
  • "fBodyGyro-meanFreq()-Y"
  • "fBodyGyro-meanFreq()-Z"
  • "fBodyAccMag-mean()"
  • "fBodyAccMag-std()"
  • "fBodyAccMag-meanFreq()"
  • "fBodyBodyAccJerkMag-mean()"
  • "fBodyBodyAccJerkMag-std()"
  • "fBodyBodyAccJerkMag-meanFreq()"
  • "fBodyBodyGyroMag-mean()"
  • "fBodyBodyGyroMag-std()"
  • "fBodyBodyGyroMag-meanFreq()"
  • "fBodyBodyGyroJerkMag-mean()"
  • "fBodyBodyGyroJerkMag-std()"
  • "fBodyBodyGyroJerkMag-meanFreq()"