need to use R RNG