correction .Rprofile