.Rprofile function, issues opened