v4ppp - 経済統計練習帳

var p=new Array();
var ps=new Array();
var q=new Array();
 
var d=new Array();
 
function sample(){
 
    for(s=1;s<10;s++){
    p[s]=0.1*s    
    }
    p[9]=0.2;
 
 
    for(s=1;s<10;s++){
    q[s]=new Array();    
    }
 
 
    for(s=1;s<10;s++){
    for(sx=0;sx<11;sx++){
    q[s][sx]=0;
    }}
 
 
    for(s=1;s<10;s++){
    for(sx=1;sx<10001;sx++){
    x1=0;
    for(sp=1;sp<11;sp++){
    if(Math.random()<0.1*s)x1=x1+1;    
    }
    q[s][x1]=q[s][x1]+1;
    }        
    }    
 
 
 
    for(s=1;s<10;s++){
    for(sx=0;sx<11;sx++){    
    q[s][sx]=q[s][sx]/100;
    }}    
 
 
    d[1]=7;
    d[2]=4;
    d[3]=5;
    d[4]=6;
    d[5]=5;
 
 
paint();  
 
 var timer;
var delay = 1000;
 
 
var loop = function () {
 
 
 for(s=1;s<10;s++){
  p1=p[s];    
  for(sx=1;sx<6;sx++){
  n=d[sx]; 
  p1=p1*q[s][n];          
  }    
  ps[s]=p1;    
  }
 
  p2=0;
  for(s=1;s<10;s++){
  p2=p2+ps[s];    
  }
 
 
 for(s=1;s<10;s++){
 p[s]=ps[s]/p2;    
 }
 
 
 paint();     
 
 
clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
 
 
 
 
}
 
function paint(){
 
    var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
 
 
for(s=1;s<10;s++){
str=str+sub.rect(50*s,500-500*p[s],50,500*p[s],"red");    
} 
str=str+sub.line(0,0,0,500,3,"blue");    
str=str+sub.line(0,500,500,500,3,"blue");    
 
 
str=str+"</svg>";
 
$("#memo").html(str);   
 
 
}