initial run analysis.R complete