アットウィキロゴ

dxk

var point=new Array();
var count=new Array();
var group=new Array();
var number;
var tx1,tx2;
var gr;
 
function sample(){
 
var s;
 
number=10;
 
for(s=1;s<number+1;s++){
point[s]=Math.random();
}
 
for(s=1;s<11;s++){
group[s]=new Array();;
}
 
for(s=1;s<number+1;s++){
group[10][s]=s;
}
 
var t;
 
for(t=1;t<10;t++){
 
gr=11-t;
 
gx(gr);
 
var h;
 
for(s=1;s<number+1;s++){
h=0;
if(group[gr][s]==tx2)h=100;
if(h<50)group[gr-1][s]=group[gr][s];
if(h>50)group[gr-1][s]=tx1;
}
 
}
 
 
for(s=1;s<number+1;s++){
count[s]=new Array();
}
 
 
for(s=1;s<number+1;s++){
for(sx=1;sx<number+1;sx++){
count[s][sx]=0;
}
}
 
for(s=1;s<number+1;s++){
for(sx=1;sx<number+1;sx++){
g1=group[s][sx];
count[s][g1]=count[s][g1]+1;
}
}
 
}
 
function ranking(){
 
var subc=new Array();
var subx=new Array();
 
var r,s;
 
for(r=1;r<number+1;r++){
 
for(s=1;s<number+1;s++){
 
 
}
 
 
}
 
 
 
 
 
 
 
 
}
 
 
 
 
function gx(g1){
 
var s1,s2;
var d1,mind;
 
tx1=0;
tx2=0;
mind=9999;
for(s1=1;s1<number+1;s1++){
for(s2=1;s2<number+1;s2++){
d1=g(g1,s1,s2);
if(s1==s2)d1=9999;
if(d1<mind)tx1=s1;
if(d1<mind)tx2=s2;
if(d1<mind)mind=d1;
}
}
 
 
}
 
function g(g1,s1,s2){
 
var subx=new Array();
var suby=new Array();
var sx,xn,yn;
 
sx=0;
for(s=1;s<number+1;s++){
if(group[g1][s]==s1)sx=sx+1;
if(group[g1][s]==s1)subx[sx]=s;
}
 
xn=sx;
 
sx=0;
for(s=1;s<number+1;s++){
if(group[g1][s]==s2)sx=sx+1;
if(group[g1][s]==s2)suby[sx]=s;
}
 
yn=sx;
 
var sx1,sx2;
var d1,mind;
 
mind=9999;
for(s=1;s<xn+1;s++){
for(sx=1;sx<yn+1;sx++){
sx1=subx[s];
sx2=suby[sx];
d1=det(sx1,sx2);
if(d1<mind)mind=d1;
}
}
 
 
 
return mind;
}
 
 
function det(s1,s2){
 
var p1;
 
p1=point[s1]-point[s2];
 
p1=p1*p1;
 
return p1;
}
 
最終更新:2014年01月16日 00:49