Update RandomNum.r

a little modification