run_analysis.R - training data

minor fix