Mercurial > octave-nkf
diff scripts/plot/__bars__.m @ 8070:3b53b25e2550
Add data sources and line series
author | David Bateman <dbateman@free.fr> |
---|---|
date | Thu, 28 Aug 2008 12:23:54 -0400 |
parents | 9a6f4713f765 |
children | a028a5960e18 |
line wrap: on
line diff
--- a/scripts/plot/__bars__.m Thu Aug 28 10:20:43 2008 -0400 +++ b/scripts/plot/__bars__.m Thu Aug 28 12:23:54 2008 -0400 @@ -29,7 +29,8 @@ for i = 1:ycols hg = hggroup (); tmp = [tmp; hg]; - + args = __add_datasource__ ("bar", hg, {"x", "y"}, varargin{:}); + if (vertical) if (! have_color_spec) if (ycols == 1) @@ -38,9 +39,9 @@ lev = (i - 1) * (clim(2) - clim(1)) / (ycols - 1) - clim(1); endif h = patch(xb(:,:,i), yb(:,:,i), "FaceColor", "flat", - "cdata", lev, "parent", hg, varargin{:}); + "cdata", lev, "parent", hg, args{:}); else - h = patch(xb(:,:,i), yb(:,:,i), "parent", hg, varargin{:}); + h = patch(xb(:,:,i), yb(:,:,i), "parent", hg, args{:}); endif else if (! have_color_spec) @@ -50,9 +51,9 @@ lev = (i - 1) * (clim(2) - clim(1)) / (ycols - 1) - clim(1); endif h = patch(yb(:,:,i), xb(:,:,i), "FaceColor", "flat", - "cdata", lev, "parent", hg, varargin{:}); + "cdata", lev, "parent", hg, args{:}); else - h = patch(yb(:,:,i), xb(:,:,i), "parent", hg, varargin{:}); + h = patch(yb(:,:,i), xb(:,:,i), "parent", hg, args{:}); endif endif