view spyh.m @ 366:7ada2db63268 feature/hypsyst

Tried to speed up the matrix set-up a little
author Ylva Rydin <ylva.rydin@telia.com>
date Tue, 13 Dec 2016 09:28:33 +0100
parents 5cb99f56f55e
children 12db86a8ec7b
line wrap: on
line source

% spyh mimics the built in spy but returns a handle which allows modifying the plot.
function h = spyh(A)
    [n,m] = size(A);
    [I,J] = find(A);

    h = plot(J,I);
    h.LineStyle = 'none';
    h.Marker = '.';
    h.MarkerSize = 14;

    a = gca;
    xlim([0 m+1]);
    ylim([0 n+1]);
    axis square
    a.YDir = 'reverse';
end