Mercurial > octave-nkf

comparison scripts/plot/__plt2vv__.m @ 6459:5dc550e1f419

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-26 18:11:58 by jwe]
author jwe
date Mon, 26 Mar 2007 18:11:58 +0000
parents a5cd8b77e892
children 76e3d985ae56
comparison
equal deleted inserted replaced
6458:6588b4fe0869 6459:5dc550e1f419
16 ## along with Octave; see the file COPYING. If not, write to the Free 16 ## along with Octave; see the file COPYING. If not, write to the Free
17 ## Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 17 ## Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
18 ## 02110-1301, USA. 18 ## 02110-1301, USA.
19 19
20 ## -*- texinfo -*- 20 ## -*- texinfo -*-
21 ## @deftypefn {Function File} {} __plt2vv__ (@var{h}, @var{x}, @var{y}, @var{options}) 21 ## @deftypefn {Function File} {} __plt2vv__ (@var{h}, @var{x}, @var{y}, @var{options}, @var{properties})
22 ## @end deftypefn 22 ## @end deftypefn
23 23
24 ## Author: jwe 24 ## Author: jwe
25 25
26 function retval = __plt2vv__ (h, x, y, options) 26 function retval = __plt2vv__ (h, x, y, options, properties)
27 27
28 if (nargin < 3 || nargin > 4) 28 if (nargin < 3 || nargin > 5)
29 print_usage (); 29 print_usage ();
30 endif 30 endif
31 31
32 if (nargin < 4 || isempty (options)) 32 if (nargin < 4 || isempty (options))
33 options = __default_plot_options__ (); 33 options = __default_plot_options__ ();
34 endif
35
36 if (nargin < 5)
37 properties = {};
34 endif 38 endif
35 39
36 if (numel (options) > 1) 40 if (numel (options) > 1)
37 options = options(1); 41 options = options(1);
38 endif 42 endif
63 if (isempty (color)) 67 if (isempty (color))
64 color = __next_line_color__ (); 68 color = __next_line_color__ ();
65 endif 69 endif
66 retval = line (x, y, "keylabel", key, "color", color, 70 retval = line (x, y, "keylabel", key, "color", color,
67 "linestyle", options.linestyle, 71 "linestyle", options.linestyle,
68 "marker", options.marker); 72 "marker", options.marker, properties{:});
69 else 73 else
70 error ("__plt2vv__: vector lengths must match"); 74 error ("__plt2vv__: vector lengths must match");
71 endif 75 endif
72 76
73 endfunction 77 endfunction