Mercurial > repos > public > sbplib

view spyh.m @ 981:a2fcc4cf2298 feature/getBoundaryOp

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update scheme.Elastic2dVariable by copy-pasting from feature/poroelastic. This is compatible with new getBoundaryOperator in multiblock.DiffOp.
author Martin Almquist <malmquist@stanford.edu>
date Mon, 07 Jan 2019 17:10:06 +0100
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