added run_analysis.R
Merge https://github.com/nil-8/getdata-assignment