added run-analysis.R script