run_analysis.R - training data