ppp766 - 経済統計練習帳

var point=new Array();
var delta=new Array();
var bx,by;
var x=new Array();
var y=new Array();
 
 
function sample(){
 
 
 
 
tx=0; 
for(s=1;s<101;s++){
for(sx=1;sx<101;sx++){
tx=tx+1;
x[tx]=s;
y[tx]=sx;
point[tx]=0;   
delta[tx]=0;
}
}
 
number=tx;
 
 
for(s=30;s<70;s++){
for(sx=30;sx<70;sx++){
n=search(s,sx);
delta[n]=100;
}   
}
 
 
sx=search(50,1)
point[sx]=100;
 
for(n=2;n<101;n++){
for(s=1;s<101;s++){
c1=search(s,n);    
z=0;
for(sx=-1;sx<2;sx++){
x1=s+sx;
y1=n-1;
sxs=search(x1,y1);
if(point[sxs]>50)z=100;           
}    
if(delta[c1]>50)z=0;
if(z>50)point[c1]=100;        
}
}
 
paint();
 
    }
 
 
 
 
function paint(){
 
var sub=new svgpaint();
 
str="<svg width=\"500\" height=\"500\">";
 
for(s=1;s<number+1;s++){    
if(point[s]>50)str=str+sub.rect(5*x[s],500-5*y[s],5,5,"red");
} 
 
 
 
str=str+"</svg>";
 
$("#memo").html(str);   
 
}
 
function search(x1,y1){
 
   var s,sx,h;
   sx=0;
for(s=1;s<number+1;s++){    
h=0;
if(x[s]==x1)h=h+1;
if(y[s]==y1)h=h+1;
if(h==2)sx=s;
}
 
return sx;
}