日本統一 - 経済統計練習帳

var x = new Array();
var y = new Array();
var link_a = new Array();
var link_b = new Array();
var dir = new Array();
var number_dir = new Array();
var namex = new Array();
var a=new Array(); 
var area = new Array();
 
 
function sample() {
 
    for(s=1;s<11;s++){
    a[s] = 20;
    }
 
    faststep();
 
    for (s = 1; s < 48;s++ ){
    area[s]=0;    
    }
 
 
        var timer;
var delay = 100;
 
var loop = function () {
 
    step();
 
    check();
 
    paint();
 
    clearTimeout(timer);
    timer = setTimeout(loop, delay);
}
 
loop();
 
}
 
function paint(){
 
 var sub=new svgpaint();
 
str="<svg width=\"700\" height=\"700\">";
 
for(s=1;s<48;s++){   
str=str+sub.rect(50*x[s],500-50*y[s],50,50,"blue");
if(area[s]==1)str=str+sub.rect(50*x[s],500-50*y[s],50,50,"green");
}
 
for(sx=1;sx<11;sx++){
s=a[sx];
str=str+sub.rect(50*x[s],500-50*y[s],50,50,"red");
}
 
 
 
str=str+"</svg>";
 
$("#memo").html(str);   
 
}
 
function step(){
 
    for (s = 1; s < 11; s++) {
        ball = a[s];
        n1 = number_dir[ball];
        n2 = n1 * Math.random();
        n3 = Math.floor(n2) + 1;
        a[s] = dir[ball][n3];
 
    }
 
}
 
 
function g(p1){
 
ss=1;
for(tx=1;tx<48;tx++){
if(namex[tx]==p1)ss=tx;    
}
return ss;
 
}
 
function f(p){
 
    sx = 0;
for(s=1;s<48;s++){
if(link_a[s]==namex[p])sx=sx+1;    
if(link_a[s]==namex[p])dir[p][sx]=g(link_b[s]);
}
 
for(s=1;s<48;s++){
if(link_b[s]==namex[p])sx=sx+1;    
if(link_b[s]==namex[p])dir[p][sx]=g(link_a[s]);
}
 
number_dir[p] = sx;
 
 
}
 
 
 
function faststep(){
 
namex[1] = "北海道";
x[1] = 10;
y[1] = 10;
namex[2] = "青森";
x[2] = 10;
y[2] = 9;
namex[3] = "岩手";
x[3] = 10;
y[3] = 8;
namex[4] = "宮城";
x[4] = 10;
y[4] = 7;
namex[5] = "福島";
x[5] = 10;
y[5] = 6;
namex[6] = "秋田";
x[6] = 9;
y[6] = 8;
namex[7] = "山形";
x[7] = 9;
y[7] = 7;
namex[8] = "茨城";
x[8] = 10;
y[8] = 5;
namex[9] = "千葉";
x[9] = 10;
y[9] = 4;
namex[10] = "東京";
x[10] = 9;
y[10] = 4;
namex[11] = "神奈川";
x[11] = 9;
y[11] = 3;
namex[12] = "山梨";
x[12] = 8;
y[12] = 4;
namex[13] = "靜岡";
x[13] = 8;
y[13] = 3;
namex[14] = "埼玉";
x[14] = 9;
y[14] = 5;
namex[15] = "栃木";
x[15] = 9;
y[15] = 6;
namex[16] = "群馬";
x[16] = 8;
y[16] = 6;
namex[17] = "新潟";
x[17] = 8;
y[17] = 7;
namex[18] = "長野";
x[18] = 8;
y[18] = 5;
namex[19] = "富山";
x[19] = 7;
y[19] = 6;
namex[20] = "愛知";
x[20] = 7;
y[20] = 4;
namex[21] = "岐阜";
x[21] = 7;
y[21] = 5;
namex[22] = "石川";
x[22] = 6;
y[22] = 7;
 
namex[23] = "福井";
x[23] = 6;
y[23] = 6;
 
namex[24] = "滋賀";
x[24] = 6;
y[24] = 5;
 
namex[25] = "三重";
x[25] = 7;
y[25] = 3;
 
namex[26] = "京都";
x[26] = 6;
y[26] = 4;
 
namex[27] = "大阪";
x[27] = 6;
y[27] = 3;
 
namex[28] = "和歌山";
x[28] = 5;
y[28] = 2;
 
namex[29] = "奈良";
x[29] = 6;
y[29] = 2;
 
namex[30] = "兵庫";
x[30] = 5;
y[30] = 3;
 
namex[31] = "岡山";
x[31] = 4;
y[31] = 4;
 
namex[32] = "鳥取";
x[32] = 4;
y[32] = 5;
 
namex[33] = "島根";
x[33] = 3;
y[33] = 5;
 
namex[34] = "広島";
x[34] = 3;
y[34] = 4;
 
namex[35] = "山口";
x[35] = 2;
y[35] = 4;
 
namex[36] = "香川";
x[36] = 4;
y[36] = 3;
 
namex[37] = "徳島";
x[37] = 4;
y[37] = 2;
 
namex[38] = "愛媛";
x[38] = 3;
y[38] = 3;
 
namex[39] = "高知";
x[39] = 3;
y[39] = 2;
 
namex[40] = "福岡";
x[40] = 2;
y[40] = 3;
 
namex[41] = "大分";
x[41] = 2;
y[41] = 2;
 
namex[42] = "宮崎";
x[42] = 2;
y[42] = 1;
 
 
namex[43] = "鹿児島";
x[43] = 1;
y[43] = 2;
 
namex[44] = "沖縄";
x[44] = 1;
y[44] = 1;
 
namex[45] = "熊本";
x[45] = 1;
y[45] = 3;
 
namex[46] = "佐賀";
x[46] = 1;
y[46] = 4;
 
namex[47] = "長崎";
x[47] = 1;
y[47] = 5;
 
link_a[1] = "北海道";
link_b[1] = "青森";
link_a[2] = "岩手";
link_b[2] = "青森";
link_a[3] = "岩手";
link_b[3] = "宮城";
link_a[4] = "福島";
link_b[4] = "宮城";
link_a[5] = "福島";
link_b[5] = "栃木";
link_a[6] = "埼玉";
link_b[6] = "栃木";
link_a[7] = "埼玉";
link_b[7] = "東京";
link_a[8] = "埼玉";
link_b[8] = "群馬";
link_a[9] = "新潟";
link_b[9] = "群馬";
link_a[10] = "東京";
link_b[10] = "山梨";
 
link_a[11] = "長野";
link_b[11] = "山梨";
 
link_a[12] = "長野";
link_b[12] = "愛知";
 
link_a[13] = "東京";
link_b[13] = "茨城";
 
link_a[14] = "東京";
link_b[14] = "神奈川";
 
link_a[15] = "靜岡";
link_b[15] = "神奈川";
 
link_a[16] = "靜岡";
link_b[16] = "愛知";
 
link_a[17] = "岐阜";
link_b[17] = "愛知";
 
link_a[18] = "岐阜";
link_b[18] = "滋賀";
 
link_a[19] = "京都";
link_b[19] = "滋賀";
 
link_a[20] = "京都";
link_b[20] = "大阪";
 
link_a[21] = "兵庫";
link_b[21] = "大阪";
 
link_a[22] = "兵庫";
link_b[22] = "岡山";
 
link_a[23] = "広島";
link_b[23] = "岡山";
 
link_a[24] = "広島";
link_b[24] = "山口";
 
link_a[25] = "福岡";
link_b[25] = "山口";
 
link_a[26] = "福岡";
link_b[26] = "大分";
 
link_a[27] = "宮崎";
link_b[27] = "大分";
 
link_a[28] = "福岡";
link_b[28] = "佐賀";
 
link_a[29] = "長崎";
link_b[29] = "佐賀";
 
link_a[30] = "熊本";
link_b[30] = "佐賀";
 
link_a[31] = "鹿児島";
link_b[31] = "熊本";
 
link_a[32] = "沖縄";
link_b[32] = "熊本";
 
link_a[33] = "岡山";
link_b[33] = "香川";
 
link_a[34] = "徳島";
link_b[34] = "香川";
 
link_a[35] = "徳島";
link_b[35] = "高知";
 
link_a[36] = "愛媛";
link_b[36] = "香川";
 
link_a[37] = "兵庫";
link_b[37] = "鳥取";
 
link_a[38] = "鳥取";
link_b[38] = "島根";
 
link_a[39] = "大阪";
link_b[39] = "和歌山";
link_a[40] = "大阪";
link_b[40] = "奈良";
link_a[41] = "愛知";
link_b[41] = "三重";
link_a[42] = "滋賀";
link_b[42] = "福井";
link_a[43] = "福井";
link_b[43] = "石川";
link_a[44] = "石川";
link_b[44] = "富山";
link_a[45] = "青森";
link_b[45] = "秋田";
link_a[46] = "山形";
link_b[46] = "宮城";
link_a[47] = "東京";
link_b[47] = "千葉";
 
 
for (s = 1; s < 48;s++ ){
    dir[s]=new Array();    
    }
 
    for (p = 1; p < 48;p++ ){
    f(p);    
    }
 
 
 
}
 
 
function check(){
 
for(s=1;s<11;s++){
    ball = a[s];
area[ball]=1;
} 
 
}