updated run_analysis.r with link to source data