add R scripts

add downloadZip.R and run_analysis.R