Create run_analysis.R 

Activity_ mean is the average of each variable for each activity.
Subject_mean is the average of each variable for each subject.