R语言编程训练：用自己的函数实现0，1均匀随机数生成

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. #随机数种子默认是1
   
2. Runif = function(n,seed = 1){
   
3.   m = 2^16
   
4.   b = 2053
   
5.   a = 13849
   
6.   xt = c()
   
7.   r = c()
   
8.   xt[1] = (b*seed + a)%%m
   
9.   for (i in 1:n) {
   
10.     r[i] = xt[i]/m
    
11.     xt[i+1] = (b * xt[i]+a)%%m
    
12.   }
    
13.   return(r)
    
14. }
    
15. Runif(50)

复制代码

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言编程 随机数生成 语言编程 R语言 随机数 R语言 自编函数