A set of R functions for Statistics 301