added a .Rprofile