Mercurial > repos > public > sbplib
view arrowAnnotation.m @ 1338:da61892884a4 feature/D2_boundary_opt
Add support for using periodic grids.
author | Vidar Stiernström <vidar.stiernstrom@it.uu.se> |
---|---|
date | Fri, 13 May 2022 13:29:05 +0200 |
parents | 2412f407749a |
children |
line wrap: on
line source
% Draw an arrow from p1 to p2, with text attached function [h] = arrowAnnotation(p1,p2) ah = gca; xl = ah.XLim(1); xr = ah.XLim(2); yl = ah.YLim(1); yr = ah.YLim(2); dx = xr - xl; dy = yr - yl; s = [ ah.Position(1) + (p1(1) - xl)/dx*ah.Position(3), ah.Position(1) + (p2(1) - xl)/dx*ah.Position(3), ]; t = [ ah.Position(2) + (p1(2) - yl)/dy*ah.Position(4), ah.Position(2) + (p2(2) - yl)/dy*ah.Position(4), ]; h = annotation('arrow', s, t); end