作者microcat (微喵)
看板Fortran
标题[问题] fortran产生随机乱数的方法?
时间Thu Mar 12 17:06:41 2009
请问如何用 fortran 产生 常态分配 及 卡方分配 的乱数
normal chi-square
以前用统计软体甚是方便,突然间要用 fortran ,
熊熊不知道该如何产生?
参考及修改了别人的程式,依旧无法执行,
请多帮忙了,谢谢。
已修正的程式:(感谢大家帮忙!)
可正常执行!
Program CHI
USE IMSL
IMPLICIT NONE
INTEGER ISEED, NOUT, NR
REAL DF, R(5)
CALL UMACH (2, NOUT)
DF = 5.0
NR = 5
ISEED = 0
CALL RNSET (ISEED)
CALL RNCHI (DR, DF, R)
WRITE (NOUT,99999) R
99999 FORMAT (' Chi-squared random deviates with 5 df: ', 5F7.3)
END Program CHI
http://tkustat.stat.tku.edu.tw/randgen.php
淡江的网站还挺好用的!
不知道能不能写出一样好用的程式?!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.109.72.144
※ 编辑: microcat 来自: 140.109.72.144 (03/12 17:17)
1F:→ charlesdc:先看你的编译器有没有支援吧 03/12 21:13
2F:推 Cypresslin:有副程式或是函数库吗? 03/12 22:04
3F:→ microcat:请问要如何知道编译器的版本?谢谢 03/13 00:06
4F:推 jsb:这个是 IMSL 的副程式。如果你是用M$的编译器, 03/13 09:47
5F:→ jsb:在 Program XXX 的下一行加个 USE MSIMSL 就行。 03/13 09:48
6F:→ microcat:谢谢各位的指导 03/13 10:44
※ 编辑: microcat 来自: 140.109.72.144 (03/13 10:51)