Winner Per Rutquist (PPath IV)
by Philip Top
Status: Passed Results: pass CPU Time: 6.86 Score: 191.0 Submitted at: 2003-11-06 12:32:12 UTC Scored at: 2003-11-06 14:46:09 UTC
Current Rank: 58th Based on: top10 (diff) Basis for: top12 (diff)
w=b(:,1)+99999; p={1}; q=1; while q r={}; s=[]; for i=find(q) y=p{i}; z=y(end); g=q(i); if g<w(z) w(z)=g; f{z}=y; end for j=find(a(z,:)) if all(j~=y) r=[r {[y j]}]; s=[s g+norm(b(z,:)-b(j,:))]; end end end p=r; q=s; end [i j]=max(w); c=f{j};