google.load("visualization", "1", {packages:["corechart"]});
var x1 = new Array();
var y1 = new Array();
var namex = new Array();
var alpha = new Array();
var w = new Array();
var y = new Array();
var ex = new Array();
var im = new Array();
var inv = new Array();
var c = new Array();
var good = new Array();
var g = new Array();
var a= new Array();
var delta=new Array();
var b= new Array();
var theta;
var wage= new Array();
var con= new Array();
var point=new Array();
var ds=new Array();
var ys=new Array();
var pic=new Array();
function sample() {
tx=0;
for(s=1;s<11;s++){
for(sx=1;sx<11;sx++){
tx=tx+1;
y1[tx]=s;
x1[tx]=sx;
}
}
pic[1]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/hokkaidou/hokkaido.gif";
pic[2]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/aomori/aomoriken.gif";
pic[3]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/iwate/iwate.gif";
pic[4]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/akita/akitaken.gif";
pic[5]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/miyagi/miyagiken.gif";
pic[6]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/yamagata/yamagataken.gif";
pic[7]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/fukushima/fukushimaken.gif";
pic[8]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/ibaragi/ibaragi.gif";
pic[9]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/tochigi/tochigi.gif";
pic[10]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/gunma/gunmaken.gif";
pic[11]="https://upload.wikimedia.org/wikipedia/commons/thumb/c/cd/Flag_of_Saitama_Prefecture.svg/2000px-Flag_of_Saitama_Prefecture.svg.png";
pic[12]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/chiba/chibaken.gif";
pic[13]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/tokyo/tokyo_simbol.gif";
pic[14]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kanagawa/kanagawa.gif";
pic[15]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/yamanashi/yamanashiken.gif";
pic[16]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/nagano/naganoken.gif";
pic[17]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/niigata/niigataken.gif";
pic[18]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/toyama/toyamaken.gif";
pic[19]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/ishikawa/ishikawa_kenki.gif";
pic[20]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/fukui/fukuiken.gif";
pic[21]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/shizuoka/shizuokaken.gif";
pic[22]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/aichi/aichi.gif";
pic[23]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/gif";
pic[24]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/mie/mieken.gif";
pic[25]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/shiga/shiga.gif";
pic[26]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kyoto/kyotofu.gif";
pic[27]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/osaka/osakafu.gif";
pic[28]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/hyogo/hyougo_kenki.gif";
pic[29]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/nara/naraken.gif";
pic[30]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/wakayama/wakayamaken.gif";
pic[31]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/shimane/shimaneken.gif";
pic[32]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/tottori/tottoriken.gif";
pic[33]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/okayama/okayamaken.gif";
pic[34]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/hiroshima/hiroshimaken.gif";
pic[35]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/yamaguchi/yamaguchiken.gif";
pic[36]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kagawa/kagawaken.gif";
pic[37]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/tokushima/tokushimaken.gif";
pic[38]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kouchi/kouchiken.gif";
pic[39]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/ehime/ehime.gif";
pic[40]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/fukuoka/fukuokaken.gif";
pic[41]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/saga/sagaken.gif";
pic[42]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/nagasaki/nagasakiken.gif";
pic[43]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/oita/oitaken.gif";
pic[44]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kumamoto/kumamotoken.gif";
pic[45]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/miyazaki/miyazakiken.gif";
pic[46]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/kagoshima/kagoshimaken_simbol.gif";
pic[47]="http://www.chubu-net.co.jp/kenzai/kensyo/mark/okinawa/okinawaken.gif";
var query = "SELECT * FROM " +
'14MPwXgD2khm2QsqR4Quhd4Y8IK5DAZrW1F_B9-0F';
var encodedQuery = encodeURIComponent(query);
var url = ['https://www.googleapis.com/fusiontables/v1/query'];
url.push('?sql=' + encodedQuery);
url.push('&key=AIzaSyAH0WCAXRIdHdbI-6bnMSN4kVDDZZmGyqY');
url.push('&callback=?');
for(s=1;s<50;s++){
alpha[s]=new Array();
}
$.ajax({
url: url.join(''),
dataType: 'jsonp',
success: function (data) {
var rows = data['rows'];
sx = 0;
for (var i in rows) {
sx = sx + 1;
namex[sx]=rows[i][0];
for(s=1;s<38;s++){
alpha[sx][s]=1*rows[i][s];
}
}
number = sx;
for(s=1;s<26;s++){
a[s]=new Array();
}
for(s=1;s<26;s++){
w[s]=alpha[29][s];
y[s]=alpha[32][s];
ex[s]=alpha[s][34];
im[s]=alpha[s][35];
inv[s]=alpha[s][33]/1+alpha[s][32]/1;
c[s]=alpha[s][28]/1+alpha[s][29]/1;
g[s]=alpha[s][30]/1+alpha[s][27]/1;
good[s]=alpha[s][31];
}
for(s=1;s<26;s++){
for(sx=1;sx<26;sx++){
a[s][sx]=alpha[s][sx]/y[sx];
}}
w1=0;
for(sx=1;sx<26;sx++){
w1=w1+w[sx];
wage[sx]=w[sx]/y[sx];
}
c1=0;
for(sx=1;sx<26;sx++){
c1=c1+c[sx];
}
for(sx=1;sx<26;sx++){
con[sx]=c[sx]/c1;
}
theta=c1/w1;
f();
}
});
}
function f(){
for(s=1;s<101;s++){
point[s]=0;
ys[s]=0;
}
point[1]=10;
var timer;
var delay = 1000;
var loop = function () {
for(s=1;s<101;s++){
sx=point[s];
ys[sx]=ys[sx]+10000*100;
}
w1=0;
for(s=1;s<26;s++){
w1=w1+ys[s];
}
for(s=1;s<26;s++){
d1=0;
for(sx=1;sx<26;sx++){
d1=d1+a[s][sx]*ys[sx];
}
c1=con[s]*w1*theta;
d1=d1+c1+g[s]+good[s]+inv[s]+ex[s]+im[s];
ds[s]=d1;
}
select();
paint();
clearTimeout(timer);
timer = setTimeout(loop, delay);
}
loop();
}
function select(){
b1=25*Math.random();
b2=Math.floor(b1)+1;
p1=100*Math.random();
p2=Math.floor(p1)+1;
c1=point[p2];
h=0;
if(c1==0)h=h+1;
if(ds[b2]>ys[b2])h=h+1;
if(h==2)point[p2]=b2;
if(ds[c1]<ys[c1])point[p2]=0;
}
function img(x,y,w,h,pic){
str="<image x="+chop(x)+" y="+chop(y)+" width="+chop(w)+" height="+chop(h)+" xlink:href="+chop(pic)+"/>";
return str;
}
function chop(st){
strx="\""+st+"\"";
return strx;
}
function paint(){
str="<svg width=\"500\" height=\"500\">";
for(s=1;s<101;s++){
sx=point[s];
if(sx>0)str=str+img(50*x1[s]-50,50*y1[s]-50,50,50,pic[sx]);
}
str=str+"</svg>";
$("#memo").html(str);
}
最終更新：2016年01月08日 11:40
