mincq - 経済統計練習帳

var x=new Array();
var y=new Array();
var ex=new Array();
var a=new Array();
var w=new Array();
var c=new Array();
var d=new Array();
 
function sample(){
 
    for(s=1;s<101;s++){
    x[s]=0;    
    }
 
    x[1]=1;
    x[2]=2;
    x[3]=3;
 
 
    for(s=1;s<4;s++){
    a[s]=new Array();    
    }
 
     for(s=1;s<4;s++){
    a[s][1]=0,1;
    a[s][2]=0.3;
    a[s][3]=0.1;
    w[s]=0.3;
    }
 
    c[1]=0.4;
    c[2]=0.2;
    c[3]=0.4;
 
 
    var timer;
var delay = 1000;
 
var loop = function () {
 
 
   for(s=1;s<4;s++){
    y[s]=0;    
    ex[s]=0;
    }
 
    ex[2]=1000;
 
    for(s=1;s<101;s++){
    sx=x[s];
    y[sx]=y[sx]+100;
    }
 
      for(s=1;s<4;s++){
    d1=0;
     for(sx=1;sx<4;sx++){
    d1=d1+a[s][sx]*y[sx];    
    } 
    d[s]=ex[s]+d1;
    }    
 
    w1=0;
    for(s=1;s<4;s++){
    w1=w1+w[s]*y[s];    
    }
 
    for(s=1;s<4;s++){
    d[s]=d[s]+c[s]*w1;    
    }
 
 
    for(s=1;s<101;s++){
    if(x[s]>0)out(s); 
    }
 
 
    for(s=1;s<101;s++){
    if(x[s]==0)inx(s); 
    }
 
    $("#memo").html((d[1]-y[1])+","+(d[2]-y[2]));
 
 
 
    clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
 
 
 
 
 
}
 
 
function out(s1){
 
    b1=x[s1];
    h=0;
    if(d[b1]<y[b1])h=h+1;
    if(Math.random()>0.5)h=h+1;
    if(h==2)x[s1]=0;
 
 
}
 
 
function inx(s1){
 
 
    n1=3*Math.random();
    n2=Math.floor(n1)+1;
    if(Math.random()>0.9)x[s1]=n2;
 
 
}