Mercurial > repos > public > sbplib

view spyh.m @ 1140:738de3a4058b feature/laplace_curvilinear_test

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update borrowing constants so that M constants are from Virta2014 and R constants are for bp=2,4,7.
author Martin Almquist <malmquist@stanford.edu>
date Fri, 21 Jun 2019 17:28:02 +0200
parents 12db86a8ec7b
children
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);

    if ~isempty(J)
        h = plot(J,I);
        h.LineStyle = 'none';
        h.Marker = '.';
        h.MarkerSize = 14;
    else
        h = [];
    end

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