| 查看: 765 | 回复: 2 | |||
[交流]
这样居然也能产生随机数
|
|
本来有个程序，要重复调用一个数组，但是数组对角元为-0.5---0.5之间的随机数，没想到下面的语句也可以实现： N=20 Gj=0.8 CALL RANDOM_SEED() !!第一次生成随机数 CALL RANDOM_NUMBER(Gj) do j=1,N H0(j,j)=(Gj(j)-0.5)*0.2*t enddo CALL SLRD(N,ENG,H0,HL,HR,SL,ETA,EPS) CALL RANDOM_NUMBER(Gj) !!第二次生成随机数 do j=1,N H0(j,j)=(Gj(j)-0.5)*0.2*t enddo CALL SLRD(N,ENG,H0,HR,HL,SR,ETA,EPS) !!第三次生成随机数 CALL RANDOM_NUMBER(Gj) do j=1,N H0(j,j)=(Gj(j)-0.5)*0.2*t enddo 经过验证，三次生成的随机数不同。而且，数次运行程序，每次生成的随机数也是互不相同的。看来这样很合理了。 发个帖，作个记号吧。 |
回复此楼» 猜你喜欢
复试调剂
已经有21人回复
-
求调剂学校
已经有13人回复
-
291 求调剂
已经有39人回复
-
271求调剂
已经有30人回复
-
材料类284调剂
已经有50人回复
-
291分调剂
已经有9人回复
-
调剂求收留
已经有34人回复
-
22408 312求调剂
已经有17人回复
-
一志愿华中农业071010，320求调剂
已经有6人回复
-
290调剂生物0860
已经有41人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- Fortran如何生成一组正态分布的随机数
已经有7人回复
- matlab产生随机二维矩阵，这些随机数只能是-1或者1？
已经有9人回复
- 产生高斯分布随机数的原理
已经有3人回复
- 【求助】如何用汇编语言产生随机数
已经有5人回复
- 【求助】随机数的生成
已经有9人回复
» 抢金币啦！回帖就可以得到:
-
青岛大学/康复大学导师课题组2026年博士研究生
+3/383
-
济南大学-先进建筑材料教育部工程研究中心-大牛团队-26届博士生申请
+1/186
-
物理学 调剂
+1/87
-
中山大学招聘博士后（化学生物学、蛋白质组学、环境毒理学）
+1/78
-
福建农林大学材料工程学院高分子材料课题组还有少量学硕/专硕招生名额
+1/66
-
上海电力大学 电力系统保护和智能调度方向 招收博士研究生
+5/65
-
北京理工大学（珠海）招收人工智能方向26级博士
+1/45
-
上海交通大学-化学化工学院 博士后招聘
+1/41
-
北华大学 08代码 调剂虚位以待
+1/38
-
科研小助理招聘~~~开工啦
+1/32
-
佛山大学 动物科技学院 畜牧 欢迎广大学子报考！
+1/14
-
湖南理工大学调剂系统已开。 化学、化工、材料化工 调剂指标充足，录取率高，欢迎调剂
+1/10
-
中南林院士团队 招 生物质能源与材料 博士生
+1/9
-
赵松方教授联合山大于伟泳杰青、延世大Jong-Hyun Ahn院士招博士后 、博士研究生
+1/8
-
延安大学化学与化工学院接收调剂生，4月11日下午复试（化学、化工和材料与化工）
+5/5
-
江西水利电力大学市政工程接受调剂
+1/4
-
江西科技师范大学食品安全检测课题组招收生物学/分析化学学硕调剂生各1名
+1/4
-
哈工程（青岛）招收电磁、微波、光学、电子信息等背景博士生（截止日期4月20日）
+1/4
-
祈福
+1/1
-
沈阳农业大学-北京协和医学院药用植物研究所联合培养硕士招生（调剂招生）
+1/1
★
田山东(金币+1): 谢谢参与
田山东(金币+1): 谢谢参与
|
本帖内容被屏蔽 |
2楼2012-12-25 21:43:23
3楼2012-12-26 10:59:55
