collection of my misc. personal R functions