R code updated to take input parameters
Merge branch 'zook' of https://github.com/efruchter/Trait into zook