New file for R utility functions Ive written