X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?p=CreaPhase.git;a=blobdiff_plain;f=octave_packages%2Fgeometry-1.5.0%2Fio%2F%40svg%2Fplot.m;fp=octave_packages%2Fgeometry-1.5.0%2Fio%2F%40svg%2Fplot.m;h=de207c163b1bbf52f7b9163d0993909619375e8a;hp=0000000000000000000000000000000000000000;hb=c880e8788dfc484bf23ce13fa2787f2c6bca4863;hpb=1705066eceaaea976f010f669ce8e972f3734b05 diff --git a/octave_packages/geometry-1.5.0/io/@svg/plot.m b/octave_packages/geometry-1.5.0/io/@svg/plot.m new file mode 100644 index 0000000..de207c1 --- /dev/null +++ b/octave_packages/geometry-1.5.0/io/@svg/plot.m @@ -0,0 +1,53 @@ +## Copyright (C) 2011 Carnë Draug +## Copyright (c) 2011 Juan Pablo Carbajal +## +## This program is free software; you can redistribute it and/or modify +## it under the terms of the GNU General Public License as published by +## the Free Software Foundation; either version 3 of the License, or +## (at your option) any later version. +## +## This program is distributed in the hope that it will be useful, +## but WITHOUT ANY WARRANTY; without even the implied warranty of +## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +## GNU General Public License for more details. +## +## You should have received a copy of the GNU General Public License +## along with this program; if not, see . + +%% -*- texinfo -*- +%% @deftypefn {Function File} {@var{h} = } plot () +%% Plots and SVG object. +%% +%% @end deftypefn + +function h = plot(obj, varargin) + + % Get path ids + ids = fieldnames(obj.Path); + npath = numel(ids); + + t = linspace (0, 1, 64); + + args={}; + if !isempty (varargin) + args = varargin; + end + for i = 1:npath + x = []; y = []; + data = obj.Path.(ids(i)).data; + + for j = 1:numel(data) + x = cat (2, x, polyval (data{j}(1,:),t)); + y = cat (2, y, polyval (data{j}(2,:),t)); + end + + h = plot(x,y,args{:}); + if i == 1 + hold on + end + end + hold off + axis tight + axis equal +endfunction +