Update run_analysis.R

Not complete yet - checking in for safe keeping for now...