added final R code
Merge branch 'master' of https://github.com/tristantao/tristan_quakers