kokuminn keizai - 経済統計練習帳

var a=new Array();
var w=new Array();
var c=new Array();
var ex=new Array();
var y=new Array();
var ys=new Array();
var d=new Array();
 
function sample(){
 
for(s=1;s<11;s++){
a[s]=new Array();    
}    
 
for(s=1;s<11;s++){
for(sx=1;sx<11;sx++){
a[s][sx]=0.05;            
}
} 
 
for(s=1;s<11;s++){
w[s]=0.3;    
c[s]=0.1;
ex[s]=0;
y[s]=10;
} 
 
ex[1]=100;
 
 
 
 
 
 
 
 
    var timer;
var delay = 100;
 
var loop = function () {
 
c1=0;
for(s=1;s<11;s++){
c1=c1+w[s]*y[s];    
}
 
for(s=1;s<11;s++){
d[s]=ex[s]+c[s]*c1;
e1=0;
for(sx=1;sx<11;sx++){
e1=e1+a[s][sx]*y[sx]    
}
d[s]=d[s]+e1;        
}
 
 
for(s=1;s<11;s++){
if(d[s]>1.05*y[s])d[s]=1.05*y[s];
if(d[s]<0.95*y[s])d[s]=0.95*y[s];
ys[s]=d[s];
}
 
 
for(s=1;s<11;s++){
y[s]=ys[s];    
}  
 
 paint();
 
 
    clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
 
 
 
}
 
 
 
function paint(){
 
var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
 
str=str+sub.rect(0,0,500,500,"blue");
for(s=1;s<11;s++){    
str=str+sub.rect(50*s-50,500-3*y[s],50,3*y[s],"red");
} 
 
 
 
str=str+"</svg>";
 
$("#memo").html(str);   
 
}