moved functions from .Rprofile to lib/