Work on R code for summary stats