Need to use idiomatic testing in R: Good example project to refer to is: https://github.com/hadley/S3/tree/master/tests