討論區快速選單
知識庫快速選單
政府補助!學嵌入式+物聯網 網路投保旅行平安險 討論區最近新進100則主題
[ 回上頁 ] [ 討論區發言規則 ]
請問..如何產生常態亂數
更改我的閱讀文章字型大小
作者 : liver08(zon)
[ 貼文 6 | 人氣 2739 | 評價 0 | 評價/貼文 0 | 送出評價 6 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2004/10/1 下午 03:04:05

請問:

如何以randn產生常態亂數,它是以高斯分佈在亂數出現的上下限區間。
其平均值為0變異數為1。

謝謝.....
作者 : eraser(eraser)
[ 貼文 15 | 人氣 275 | 評價 220 | 評價/貼文 14.67 | 送出評價 1 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
主題發起人liver08註記此篇回應為很有道理 2004/10/2 下午 05:16:16
可以 call random(a)這個函式
real(4)::a
0<= a <1
通常使用前要加上
integer(4)::b
call seed(b)
給一個起點 相同的起點 會有相同次序的亂數(組)
如果你每次執行 程式都要 有不同的亂數(組)
 可以使用
program test
real(4)::a
use dflib
call seed(RND$TIMESEED)
call random(a)
stop
end program
至於要符合你的要求
我想應該要翻翻統計學的書
對亂數動一點手腳 來滿足你的要求
作者 : liver08(zon)
[ 貼文 6 | 人氣 2739 | 評價 0 | 評價/貼文 0 | 送出評價 6 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2004/10/2 下午 08:27:49
我找到解決方法啦 ....跟大家分享一下....雖然不知對不對

real :: a
call random_seed()
call random_number(a)

!原本a是界於[0與1]之間的均勻分佈亂數
!在來經過一個方程式的轉換
!將原本高斯分佈函數 f(x)=a=$*exp(-(x/c)^2) ;c是變異數:$係數
!然後將X提出來....改成.....function of a

write(*,*) x !此時的X就是常態亂數....其平均值是0:標準差1
作者 : f77f95(f77f95) Fortran頂尖高手貼文超過500則
[ 貼文 548 | 人氣 9 | 評價 3370 | 評價/貼文 6.15 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
主題發起人liver08註記此篇回應為最佳解答 2004/10/5 上午 09:35:05
check out the following URL:

ftp://ftp.netlib.org/random/random.f90

It has a good solution for you.
作者 : ohayou(oyasumi)
[ 貼文 1 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2006/10/10 上午 10:00:39
由於英文程度還不是很夠,再加上對於fortran也只是剛學沒多久,看這篇程式有點吃力。
約略看一下,似乎不只有常態分佈,還有許多機率類型。
可否麻煩將這篇程式裡常態分佈的部分另外列出來呢?
作者 : okay4486(okay)
[ 貼文 1 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 1 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/3/26 上午 10:29:10
請問大大
您的fortran程式 若用ms fortran寫 會有link上面的問題耶
我猜是ms的版本問題
請問該怎麼解決呢?
 板主 : 徵求中
 > Fortran - 討論區
 - 最近熱門問答精華集
 - 全部歷史問答精華集
 - Fortran - 知識庫
  ■ 全站最新Post列表
  ■ 我的文章收藏
  ■ 我最愛的作者
  ■ 全站文章收藏排行榜
  ■ 全站最愛作者排行榜
  ■  月熱門主題
  ■  季熱門主題
  ■  熱門主題Top 20
  ■  本區Post排行榜
  ■  本區評價排行榜
  ■  全站專家名人榜
  ■  全站Post排行榜
  ■  全站評價排行榜
  ■  全站人氣排行榜
 請輸入關鍵字 
  開始搜尋
 
Top 10
評價排行
Fortran
1 f77f95 3300 
2 dennis 470 
3 cc 350 
4 smallpotato 320 
5 qq 290 
6 冼鏡光 230 
7 eraser 220 
8 小文 210 
9 iner 200 
10 wuda 160 
Fortran
  專家等級 評價  
  一代宗師 10000  
  曠世奇才 5000  
  頂尖高手 3000  
  卓越專家 1500  
  優秀好手 750  
Microsoft Internet Explorer 6.0. Screen 1024x768 pixel. High Color (16 bit).
2000-2018 程式設計俱樂部 http://www.programmer-club.com.tw/
0.078125