% Plotting script for post NeuralGas.m

plot(X(:,1),X(:,2),'k.');
hold on
for jj=2:NumCenters
    for kk=1:jj-1
        if M(jj,kk)==1
            plot(C([jj,kk],1),C([jj,kk],2),'ro',C([jj,kk],1),C([jj,kk],2),'b-');
        end
    end
end
hold off