added some helper functions to .Rprofile