run_analysis.R

Implementation of cource project task