visualize(sequence,target,budget,moves)

function score = visualize(sequence,target,budget,moves)

% Copyright 2007 The MathWorks, Inc.

board = zeros(min(size(moves,1),budget)+2,numel(sequence));
board([1 end],:) = [sequence;target];
labels = cell(min(size(moves,1),budget)+2,1);
labels([1 end])={'Seed','Target'};
for j = 1:min(size(moves,1),budget)
    board(j+1,:) = doMoves(board(j,:),moves(j,:),1);
    labels{j+1} = sprintf('[%d,%d,%d,%d]',moves(j,:));
end
score = sum(abs(diff(board((end-1:end),:))));
imagesc(board)
ylabel('Moves')
set(gca,'Ytick',1:min(size(moves,1),budget)+2,'YtickLabel',labels)
msg = sprintf('Budget: %d   Moves: %d   Score: %.4f',budget,size(moves,1),score);
title(msg)
figure(gcf)