run_analysis.R modified. Separeted in getDataSet() and getAverage() functions.