add run_analysis.R script, data and result