set seed in .Rprofile