added .Rprofile