run_analysis.R initial check in