隨機(jī)序列的生成

perljoker

記得前久說到過隨機(jī)數(shù)生成的想關(guān)程序，可是，在我提出隨機(jī)序列如何生成時(shí)，貌似沒人關(guān)注了
今天看java的時(shí)候，受到里面方法指導(dǎo)，想到了perl生成隨機(jī)序列的方法，不采用hash
并且可以重復(fù)使用該方法，寫了2個(gè)，在有個(gè)細(xì)微的地方有差別，先看下：

1. 
   
2. # method A
   
3. for($k=0;$k<10;$k++){$arr[$k]=$k;}
   
4. print "@arr\n";
   
5. for($k=0;$k<10;$k++){
   
6.     $i=int(rand(10));
   
7.     @arr[$i,$k]=@arr[$k,$i];
   
8. }
   
9. print "@arr\n";
   

復(fù)制代碼

1. 
   
2. # method B
   
3. for($k=0;$k<10;$k++){$arr[$k]=$k;}
   
4. print "@arr";
   
5. for($k=0;$k<10;$k++){
   
6.     $i=int(rand(10));
   
7.     @arr[$i,1]=@arr[1,$i];   #注意，這里和上面的差別就是$k換成了固定值，比如1
   
8. }
   
9. print "@arr\n";
   

復(fù)制代碼

上述2種方法獲得隨機(jī)序列都很好
問題是，我對哪種方法能得到更好的隨機(jī)序列存在疑問
不知道誰能來解析下2中方法的效果

補(bǔ)充：2種方法的文字說明：
對于一個(gè)數(shù)列，假設(shè)是順序的，如 1 2 3 4 5 6
B：每次隨機(jī)取其中一個(gè)位置，將他的數(shù)值和1號位數(shù)值交換，換6次，得到一個(gè)隨機(jī)數(shù)列
A：每次隨機(jī)取一個(gè)位置，將他的數(shù)值和順序位數(shù)值交換，換6次，得到一個(gè)隨機(jī)數(shù)列

[ 本帖最后由 perljoker 于 2008-2-20 17:11 編輯 ]

Nosferatu

皮爾遜定理看是否符合泊松分布

lipch

ms很巧妙的方法，但是不是真的隨機(jī)不知道。
好象隨機(jī)數(shù)的產(chǎn)生可以寫一本博士論文，不知道這樣是否合理。
請達(dá)人指教。

lipch

另外，糾正一個(gè)地方，這個(gè)程序共交換了10次，不是6次

不死草

呵呵，感覺貌似彩票的隨機(jī) 。
恩，貌似可以使用排序函數(shù)？