Added r-script run_analysis.R and data.txt, obtained by performing this script.