su - 経済統計練習帳

var number;
var a=new Array();
var point=new Array();
var rank=new Array();
 
function sample(){
 
    number=52;
 
n=0;
 
    for(t=1;t<10001;t++){
 
    for(s=1;s<number+1;s++){
    point[s]=100*Math.random();    
    }
 
 
ranking();
 
 
for(s=1;s<number+1;s++){
a[s]=0
}
 
 
for(s=1;s<31;s++){
sx=rank[s];   
a[sx]=100;
}
 
 
h=0;
for(s=1;s<8;s++){
if(a[s]>50)h=100;    
}
 
if(h<50)n=n+1;
 
 
}
 
 
 
m=n/100;
 
p=30/52;
 
q=1-p;
for(s=1;s<7;s++){
q=q*(1-p)
}
 
$("#memo").html(q*100);
 
 
 
 
 
 
 
}
 
   function ranking(){  
 
var ch=new Array();
var r,sx,s,h;
 
for(s=1;s<number+1;s++){
ch[s]=0;    
}
 
for(r=1;r<number+1;r++){ 
sx=0; 
maxu=-999; 
for(s=1;s<number+1;s++){ 
h=0; 
if(point[s]>maxu)h=h+1; 
if(ch[s]<50)h=h+1; 
if(h==2)maxu=point[s]; 
if(h==2)sx=s; 
}
rank[r]=sx; 
ch[sx]=100; 
}
 
 
}