r语言生成随机数的方法