Roger's first commit of roger-analysis.R