7th try!

Status: Passed
Results: pass
CPU Time: 29.032
Score: 240.0
Submitted at: 2003-11-06 11:53:36 UTC
Scored at: 2003-11-06 12:51:22 UTC

Current Rank: 84th
Based on: Tweak (diff)
Basis for: Imre 5 (diff)

Comments
Add a comment:	Please login or create a profile.

Code

n = size(a, 1);
S = {1};
D = (1:n)/0;
P = cell(1,n);
while numel(S)
   p = S{end};
   S(end)=[];
   t = a(p(end),:);
   k = setdiff(find(t), p);
   for q = k
      r = [p q];
      S{end+1} = r;
      d = 0;
      for i = 2:numel(r)
         d = d + norm(b(r(i),:) - b(r(i-1),:));
      end
      u=r(end);
      if d < D(u)
         D(u) = d;
         P{u} = r;
      end
   end
end

D(isinf(D))=0;
[i j]=max(D);
c=P{j};