A bunch of custom R functions you use a lot