octave-libtiff: scripts/plot/colorbar.m annotate

annotate scripts/plot/colorbar.m @ 14247:c4fa5e0b6193

test: Make surface demos reproducible by setting colormap to default at start of demo. * bicubic.m, interp2.m, interpn.m, griddata.m, image.m, axis.m, clabel.m, colorbar.m, contour.m, contourf.m, cylinder.m, ezcontour.m, ezcontourf.m, ezmesh.m, ezmeshc.m, ezsurf.m, ezsurfc.m, hold.m, pcolor.m, plotyy.m, quiver3.m, ribbon.m, shading.m, slice.m, sombrero.m, surf.m, surfc.m, surfnorm.m, trisurf.m: Set colormap to default at start of demos to make them reproducible.

author	Rik <octave@nomad.inbox5.com>
date	Sun, 22 Jan 2012 10:02:27 -0800
parents	4506eade9f04
children	f3d52523cde1

rev	line source
14138 72c96de7a403 maint: update copyright notices for 2012 John W. Eaton <jwe@octave.org> parents: 12575 diff changeset	1 ## Copyright (C) 2008-2012 David Bateman
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	2 ##
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	3 ## This file is part of Octave.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	4 ##
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	5 ## Octave is free software; you can redistribute it and/or modify it
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	6 ## under the terms of the GNU General Public License as published by
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	7 ## the Free Software Foundation; either version 3 of the License, or (at
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	8 ## your option) any later version.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	9 ##
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	10 ## Octave is distributed in the hope that it will be useful, but
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	11 ## WITHOUT ANY WARRANTY; without even the implied warranty of
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	13 ## General Public License for more details.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	14 ##
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	15 ## You should have received a copy of the GNU General Public License
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	16 ## along with Octave; see the file COPYING. If not, see
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	17 ## <http://www.gnu.org/licenses/>.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	18
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	19 ## -- texinfo --
10793 be55736a0783 Grammarcheck the documentation from m-files. Rik <octave@nomad.inbox5.com> parents: 10558 diff changeset	20 ## @deftypefn {Function File} {} colorbar (@var{s})
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	21 ## @deftypefnx {Function File} {} colorbar ("peer", @var{h}, @dots{})
12575 d0b799dafede Grammarcheck files for 3.4.1 release. Rik <octave@nomad.inbox5.com> parents: 12501 diff changeset	22 ## Add a colorbar to the current axes. Valid values for @var{s} are
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	23 ##
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	24 ## @table @asis
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	25 ## @item "EastOutside"
9040 dbd0c77e575e Cleanup documentation file plot.texi Rik <rdrider0-list@yahoo.com> parents: 8920 diff changeset	26 ## Place the colorbar outside the plot to the right. This is the default.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	27 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	28 ## @item "East"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	29 ## Place the colorbar inside the plot to the right.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	30 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	31 ## @item "WestOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	32 ## Place the colorbar outside the plot to the left.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	33 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	34 ## @item "West"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	35 ## Place the colorbar inside the plot to the left.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	36 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	37 ## @item "NorthOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	38 ## Place the colorbar above the plot.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	39 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	40 ## @item "North"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	41 ## Place the colorbar at the top of the plot.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	42 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	43 ## @item "SouthOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	44 ## Place the colorbar under the plot.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	45 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	46 ## @item "South"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	47 ## Place the colorbar at the bottom of the plot.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	48 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	49 ## @item "Off", "None"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	50 ## Remove any existing colorbar from the plot.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	51 ## @end table
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	52 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	53 ## If the argument "peer" is given, then the following argument is treated
7264 fac10884ddd4 [project @ 2007-12-05 22:09:53 by jwe] jwe parents: 7208 diff changeset	54 ## as the axes handle on which to add the colorbar.
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	55 ## @end deftypefn
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	56
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	57 function h = colorbar (varargin)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	58 ax = [];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	59 loc = "eastoutside";
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	60 args = {};
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	61 deleting = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	62
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	63 i = 1;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	64 while (i <= nargin)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	65 arg = varargin {i++};
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	66 if (ischar(arg))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	67 if (strcmpi (arg, "peer"))
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	68 if (i > nargin)
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	69 error ("colorbar: missing axes handle after \"peer\"");
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	70 else
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	71 ax = varargin{i++};
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	72 if (!isscalar (ax) \|\| ! ishandle (ax)
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	73 \|\| ! strcmp (get (ax, "type"), "axes"))
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	74 error ("colorbar: expecting an axes handle following \"peer\"");
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	75 endif
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	76 endif
8190 73d6b71788c0 use case-insensitive comparison for graphics properties; misc style fixes John W. Eaton <jwe@octave.org> parents: 8102 diff changeset	77 elseif (strcmpi (arg, "north") \|\| strcmpi (arg, "south")
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	78 \|\| strcmpi (arg, "east") \|\| strcmpi (arg, "west")
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	79 \|\| strcmpi (arg, "northoutside") \|\| strcmpi (arg, "southoutside")
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	80 \|\| strcmpi (arg, "eastoutside") \|\| strcmpi (arg, "westoutside"))
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	81 loc = tolower (arg);
12501 5454b687fd14 colorbar.m: Allow location to be specified as a property. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	82 elseif (strcmpi (arg, "location") && i <= nargin)
5454b687fd14 colorbar.m: Allow location to be specified as a property. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	83 loc = tolower (varargin{i++});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	84 elseif (strcmpi (arg, "off") \|\| strcmpi (arg, "none"))
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	85 deleting = true;
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	86 else
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	87 args{end+1} = arg;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	88 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	89 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	90 args{end+1} = arg;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	91 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	92 endwhile
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	93
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	94 if (isempty (ax))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	95 ax = gca ();
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	96 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	97
8892 32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	98 showhiddenhandles = get (0, "showhiddenhandles");
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	99 unwind_protect
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	100 set (0, "showhiddenhandles", "on");
8892 32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	101 cax = findobj (get (ax, "parent"), "tag", "colorbar", "type", "axes", "axes", ax);
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	102 if (! isempty (cax))
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	103 delete (cax);
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	104 endif
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	105 unwind_protect_cleanup
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	106 set (0, "showhiddenhandles", showhiddenhandles);
8892 32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	107 end_unwind_protect
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	108
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	109 if (! deleting)
10931 a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	110 ## FIXME - Matlab does not require the "position" property to be active.
11576 8ac9687dbe9f rename backend to graphics_toolkit John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	111 ## Is there a way to determine the plotbox position for the
8ac9687dbe9f rename backend to graphics_toolkit John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	112 ## gnuplot graphics toolkit with the outerposition is active?
10931 a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	113 set (ax, "activepositionproperty", "position");
8892 32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	114 obj = get (ax);
10920 91ff0d7ee94b Don't pass figure handle to __calc_dimensions__. Ben Abbott <bpabbott@mac.com> parents: 10910 diff changeset	115 obj.__my_handle__ = ax;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	116 position = obj.position;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	117 clen = rows (get (get (ax, "parent"), "colormap"));
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	118 cext = get (ax, "clim");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	119 cdiff = (cext(2) - cext(1)) / clen / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	120 cmin = cext(1) + cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	121 cmax = cext(2) - cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	122
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	123 [pos, cpos, vertical, mirror] = ...
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	124 __position_colorbox__ (loc, obj, ancestor (ax, "figure"));
10931 a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	125 set (ax, "position", pos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	126
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	127 cax = __go_axes__ (get (ax, "parent"), "tag", "colorbar",
c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	128 "handlevisibility", "on",
c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	129 "activepositionproperty", "position",
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	130 "position", cpos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	131 addproperty ("location", cax, "radio",
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	132 "eastoutside\|east\|westoutside\|west\|northoutside\|north\|southoutside\|south",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	133 loc);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	134 addproperty ("axes", cax, "handle", ax);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	135
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	136 if (vertical)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	137 hi = image (cax, [0,1], [cmin, cmax], [1 : clen]');
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	138 if (mirror)
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	139 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	140 "ylim", cext, "ylimmode", "manual",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	141 "yaxislocation", "right", args{:});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	142 else
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	143 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	144 "ylim", cext, "ylimmode", "manual",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	145 "yaxislocation", "left", args{:});
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	146 endif
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	147 else
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	148 hi = image (cax, [cmin, cmax], [0,1], [1 : clen]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	149 if (mirror)
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	150 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	151 "xlim", cext, "xlimmode", "manual",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	152 "xaxislocation", "top", args{:});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	153 else
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	154 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	155 "xlim", cext, "xlimmode", "manual",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	156 "xaxislocation", "bottom", args{:});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	157 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	158 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	159
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	160 ctext = text (0, 0, "", "tag", "colorbar","visible", "off",
c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	161 "handlevisibility", "off", "xliminclude", "off",
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	162 "yliminclude", "off", "zliminclude", "off",
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	163 "deletefcn", {@deletecolorbar, cax, obj});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	164
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	165 set (cax, "deletefcn", {@resetaxis, obj});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	166
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	167 addlistener (ax, "clim", {@update_colorbar_clim, hi, vertical});
b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	168 addlistener (ax, "plotboxaspectratio", {@update_colorbar_axis, cax, obj});
b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	169 addlistener (ax, "plotboxaspectratiomode", {@update_colorbar_axis, cax, obj});
b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	170 addlistener (ax, "dataaspectratio", {@update_colorbar_axis, cax, obj});
b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	171 addlistener (ax, "dataaspectratiomode", {@update_colorbar_axis, cax, obj});
b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	172 addlistener (ax, "position", {@update_colorbar_axis, cax, obj});
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	173
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	174 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	175
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	176 if (nargout > 0)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	177 h = cax;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	178 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	179 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	180
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	181 function deletecolorbar (h, d, hc, orig_props)
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	182 ## Don't delete the colorbar and reset the axis size if the
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	183 ## parent figure is being deleted.
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	184 if (ishandle (hc) && strcmp (get (hc, "type"), "axes")
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	185 && (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	186 if (strcmp (get (hc, "beingdeleted"), "off"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	187 delete (hc);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	188 endif
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	189 if (!isempty (ancestor (h, "axes"))
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	190 && strcmp (get (ancestor (h, "axes"), "beingdeleted"), "off"))
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	191 set (ancestor (h, "axes"), "position", orig_props.position, ...
10931 a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	192 "outerposition", orig_props.outerposition, ...
a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	193 "activepositionproperty", orig_props.activepositionproperty);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	194 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	195 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	196 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	197
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	198 function resetaxis (h, d, orig_props)
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	199 if (ishandle (h) && strcmp (get (h, "type"), "axes")
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	200 && (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off"))
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	201 && ishandle (get (h, "axes")))
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	202 set (get (h, "axes"), "position", orig_props.position, ...
10931 a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	203 "outerposition", orig_props.outerposition, ...
a72d53df4fa6 Treatment of activepositionproperty for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10920 diff changeset	204 "activepositionproperty", orig_props.activepositionproperty);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	205 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	206 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	207
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	208 function update_colorbar_clim (h, d, hi, vert)
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	209 if (ishandle (h) && strcmp (get (h, "type"), "image")
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	210 && (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	211 clen = rows (get (get (h, "parent"), "colormap"));
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	212 cext = get (h, "clim");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	213 cdiff = (cext(2) - cext(1)) / clen / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	214 cmin = cext(1) + cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	215 cmax = cext(2) - cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	216
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	217 if (vert)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	218 set (hi, "ydata", [cmin, cmax]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	219 set (get (hi, "parent"), "ylim", cext);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	220 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	221 set (hi, "xdata", [cmin, cmax]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	222 set (get (hi, "parent"), "xlim", cext);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	223 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	224 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	225 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	226
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	227 function update_colorbar_axis (h, d, cax, orig_props)
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	228
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	229 if (ishandle (cax) && strcmp (get (cax, "type"), "axes")
fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11001 diff changeset	230 && (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	231 loc = get (cax, "location");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	232 obj = get (h);
10920 91ff0d7ee94b Don't pass figure handle to __calc_dimensions__. Ben Abbott <bpabbott@mac.com> parents: 10910 diff changeset	233 obj.__my_handle__ = h;
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	234 obj.position = orig_props.position;
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	235 obj.outerposition = orig_props.outerposition;
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	236 [pos, cpos, vertical, mirror] = ...
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	237 __position_colorbox__ (loc, obj, ancestor (h, "figure"));
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	238
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	239 if (vertical)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	240 if (mirror)
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	241 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	242 "yaxislocation", "right", "position", cpos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	243 else
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	244 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	245 "yaxislocation", "left", "position", cpos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	246 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	247 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	248 if (mirror)
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	249 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	250 "xaxislocation", "top", "position", cpos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	251 else
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	252 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 10534 diff changeset	253 "xaxislocation", "bottom", "position", cpos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	254 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	255 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	256
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	257 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	258 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	259
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	260 function [pos, cpos, vertical, mirr] = __position_colorbox__ (cbox, obj, cf)
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	261
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	262 ## This will always represent the position prior to adding the colorbar.
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	263 pos = obj.position;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	264 sz = pos(3:4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	265
11197 836427db633b Make colorbar function aware of dataaspect settings Konstantinos Poulios <logari81@googlemail.com> parents: 11149 diff changeset	266 if (strcmpi (obj.plotboxaspectratiomode, "manual")
836427db633b Make colorbar function aware of dataaspect settings Konstantinos Poulios <logari81@googlemail.com> parents: 11149 diff changeset	267 \|\| strcmpi (obj.dataaspectratiomode, "manual"))
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	268 if (isempty (strfind (cbox, "outside")))
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	269 scale = 1.0;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	270 else
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	271 scale = 0.8;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	272 endif
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	273 if (isempty (strfind (cbox, "east")) && isempty (strfind (cbox, "west")))
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	274 scale = [1, scale];
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	275 else
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	276 scale = [scale, 1];
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	277 endif
11576 8ac9687dbe9f rename backend to graphics_toolkit John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	278 if (strcmp (get (cf, "__graphics_toolkit__"), "gnuplot")
11001 2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	279 && strcmp (obj.activepositionproperty, "outerposition"))
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	280 obj.outerposition = obj.outerposition .* [1, 1, scale];
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	281 off = 0.5 * (obj.outerposition (3:4) - __actual_axis_position__ (obj)(3:4));
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	282 else
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	283 obj.position = obj.position .* [1, 1, scale];
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	284 off = 0.5 * (obj.position (3:4) - __actual_axis_position__ (obj)(3:4));
2ab8cc6dcced Special treatment activepositionproperty = outerposition for gnuplot. Ben Abbott <bpabbott@mac.com> parents: 10953 diff changeset	285 endif
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	286 else
23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	287 off = 0.0;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	288 endif
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	289
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	290 switch (cbox)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	291 case "northoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	292 origin = pos(1:2) + [0., 0.9] .* sz + [1, -1] .* off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	293 sz = sz .* [1.0, 0.06];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	294 pos(4) = 0.8 * pos(4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	295 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	296 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	297 case "north"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	298 origin = pos(1:2) + [0.05, 0.9] .* sz + [1, -1] .* off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	299 sz = sz .* [1.0, 0.06] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	300 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	301 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	302 case "southoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	303 origin = pos(1:2) + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	304 sz = sz .* [1.0, 0.06];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	305 pos(2) = pos(2) + pos(4) * 0.2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	306 pos(4) = 0.8 * pos(4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	307 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	308 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	309 case "south"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	310 origin = pos(1:2) + [0.05, 0.05] .* sz + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	311 sz = sz .* [1.0, 0.06] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	312 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	313 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	314 case "eastoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	315 origin = pos(1:2) + [0.9, 0] .* sz + [-1, 1] .* off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	316 sz = sz .* [0.06, 1.0];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	317 pos(3) = 0.8 * pos(3);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	318 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	319 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	320 case "east"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	321 origin = pos(1:2) + [0.9, 0.05] .* sz + [-1, 1] .* off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	322 sz = sz .* [0.06, 1.0] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	323 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	324 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	325 case "westoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	326 origin = pos(1:2) + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	327 sz = sz .* [0.06, 1.0];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	328 pos(1) = pos(1) + pos(3) * 0.2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	329 pos(3) = 0.8 * pos(3);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	330 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	331 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	332 case "west"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	333 origin = pos(1:2) + [0.05, 0.05] .* sz + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	334 sz = sz .* [0.06, 1.0] .* 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	335 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	336 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	337 endswitch
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	338
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	339 cpos = [origin, sz];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	340
11197 836427db633b Make colorbar function aware of dataaspect settings Konstantinos Poulios <logari81@googlemail.com> parents: 11149 diff changeset	341 if (strcmpi (obj.plotboxaspectratiomode, "manual")
836427db633b Make colorbar function aware of dataaspect settings Konstantinos Poulios <logari81@googlemail.com> parents: 11149 diff changeset	342 \|\| strcmpi (obj.dataaspectratiomode, "manual"))
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	343 obj.position = pos;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	344 actual_pos = __actual_axis_position__ (obj);
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	345 if (strfind (cbox, "outside"))
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	346 scale = 1.0;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	347 else
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	348 scale = 0.9;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	349 endif
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	350 if (sz(1) > sz(2))
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	351 ## Ensure north or south colorbars are the proper length
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	352 dx = (1-scale)*actual_pos(3);
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	353 cpos(1) = actual_pos(1) + dx/2;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	354 cpos(3) = actual_pos(3) - dx;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	355 else
10558 23c1910dbd8e Fix colorbar() bugs for manual plotboxaspectratio. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	356 ## Ensure east or west colorbars are the proper height
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	357 dy = (1-scale)*actual_pos(4);
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	358 cpos(2) = actual_pos(2) + dy/2;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	359 cpos(4) = actual_pos(4) - dy;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	360 endif
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	361 endif
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	362
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	363 endfunction
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	364
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	365
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	366 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	367 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	368 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	369 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	370 %! imagesc (x);
8892 32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	371 %! colorbar ();
32d218494602 colorbar.m: Bug fix. Allow hidden colorbars to be deleted, and replace existing colorbar when a new one is created. Additional demos are included to verify these behaviors. Ben Abbott <bpabbott@mac.com> parents: 8889 diff changeset	372
9281 02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	373 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	374 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	375 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	376 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	377 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	378 %! colorbar ('westoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	379
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	380 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	381 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	382 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	383 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	384 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	385 %! colorbar ('peer', gca (), 'northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	386
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	387 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	388 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	389 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	390 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	391 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	392 %! colorbar ('southoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	393
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	394 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	395 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	396 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	397 %! contour (peaks ());
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	398 %! colorbar ('west');
9281 02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	399
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	400 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	401 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	402 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	403 %! subplot (2,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	404 %! contour (peaks ());
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	405 %! colorbar ('east');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	406 %! subplot (2,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	407 %! contour (peaks ());
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	408 %! colorbar ('west');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	409 %! subplot (2,2,3);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	410 %! contour (peaks ());
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	411 %! colorbar ('north');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	412 %! subplot (2,2,4);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	413 %! contour (peaks ());
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	414 %! colorbar ('south');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	415
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	416 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	417 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	418 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	419 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	420 %! subplot (2,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	421 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	422 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	423 %! subplot (2,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	424 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	425 %! colorbar ('westoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	426 %! subplot (2,2,3);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	427 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	428 %! colorbar ('northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	429 %! subplot (2,2,4);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	430 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	431 %! colorbar ('southoutside');
9281 02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	432
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	433 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	434 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	435 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	436 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	437 %! subplot (1,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	438 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	439 %! axis square;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	440 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	441 %! subplot (1,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	442 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	443 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	444 %! colorbar ('westoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	445
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	446 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	447 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	448 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	449 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	450 %! subplot (1,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	451 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	452 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	453 %! colorbar ('northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	454 %! subplot (1,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	455 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	456 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	457 %! colorbar ('southoutside');
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	458
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	459 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	460 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	461 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	462 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	463 %! subplot (2,1,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	464 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	465 %! axis square;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	466 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	467 %! subplot (2,1,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	468 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	469 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	470 %! colorbar ('westoutside');
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	471
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	472 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	473 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	474 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	475 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	476 %! subplot (2,1,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	477 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	478 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	479 %! colorbar ('northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	480 %! subplot (2,1,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	481 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	482 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	483 %! colorbar ('southoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	484
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	485 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	486 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	487 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	488 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	489 %! subplot (1,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	490 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	491 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	492 %! subplot (1,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	493 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	494 %! colorbar ('westoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	495
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	496 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	497 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	498 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	499 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	500 %! subplot (1,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	501 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	502 %! colorbar ('northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	503 %! subplot (1,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	504 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	505 %! colorbar ('southoutside');
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	506
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	507 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	508 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	509 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	510 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	511 %! subplot (2,1,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	512 %! imagesc (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	513 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	514 %! subplot (2,1,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	515 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	516 %! colorbar ('westoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	517
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	518 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	519 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	520 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	521 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	522 %! subplot (2,1,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	523 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	524 %! colorbar ('northoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	525 %! subplot (2,1,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	526 %! imagesc (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	527 %! colorbar ('southoutside');
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	528
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	529 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	530 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	531 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	532 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	533 %! subplot (1,2,1);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	534 %! contour (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	535 %! axis square;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	536 %! colorbar ('east');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	537 %! xlim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	538 %! ylim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	539 %! subplot (1,2,2);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	540 %! contour (x);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	541 %! colorbar ('west');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	542 %! xlim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	543 %! ylim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	544
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	545 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	546 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	547 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	548 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	549 %! contour (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	550 %! xlim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	551 %! ylim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	552 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	553 %! colorbar off;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	554
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	555 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	556 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	557 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	558 %! n = 64; x = kron (1:n, ones (n,1)); x = abs (x - x.');
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	559 %! contour (x);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	560 %! xlim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	561 %! ylim ([1, 64]);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	562 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	563
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	564 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	565 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	566 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	567 %! imagesc (1 ./ hilb (99));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	568 %! h = colorbar ();
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	569 %! set (h, 'yscale', 'log');
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	570
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	571 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	572 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	573 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	574 %! imagesc (log10 (1 ./ hilb (99)));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	575 %! h = colorbar ();
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	576 %! ytick = get (h, 'ytick');
4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	577 %! set (h, 'yticklabel', sprintf ('10^{%g}\|', ytick));
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	578
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	579 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	580 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	581 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	582 %! n = 5; x = linspace (0,5,n); y = linspace (0,1,n);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	583 %! imagesc (1 ./ hilb (n));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	584 %! axis equal;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	585 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	586
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	587 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	588 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	589 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	590 %! n = 5; x = linspace (0,5,n); y = linspace (0,1,n);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	591 %! imagesc (x, y, 1 ./ hilb (n));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	592 %! axis equal;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	593 %! colorbar ();
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	594
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	595 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	596 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	597 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	598 %! n = 5; x = linspace (0,5,n); y = linspace (0,1,n);
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	599 %! imagesc (y, x, 1 ./ hilb (n));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	600 %! axis equal;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	601 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	602
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	603 ## This requires that the axes position be properly determined for 'axis equal'
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	604 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	605 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	606 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	607 %! axes;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	608 %! colorbar ();
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	609 %! hold on;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	610 %! contour (peaks ());
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	611 %! hold off;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	612
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	613 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	614 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	615 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	616 %! plot ([0, 2]);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	617 %! colorbar ('east');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	618 %! axis square;
10910 40cf7cc4ea62 Properly interpret plotboxaspectratio when 3D objects are viewed as 2D. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	619
40cf7cc4ea62 Properly interpret plotboxaspectratio when 3D objects are viewed as 2D. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	620 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	621 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	622 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	623 %! plot ([0, 2]);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	624 %! colorbar ('eastoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	625 %! axis square;
9297 0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	626
0d9f925b9705 colorbar.m: Colorbar 'handlevisibility' should be 'on'. Add additional demos which illustrate problems with the present implementation. Ben Abbott <bpabbott@mac.com> parents: 9281 diff changeset	627 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	628 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	629 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	630 %! pcolor (peaks (20));
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	631 %! shading interp;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	632 %! axis ('tight', 'square');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	633 %! colorbar ();
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	634 #%! axes ('color','none','box','on','activepositionproperty','position');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	635
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	636 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	637 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	638 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	639 %! plot ([0, 2]);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	640 %! colorbar ('east');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	641 %! axis equal;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	642
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	643 %!demo
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	644 %! clf;
14247 c4fa5e0b6193 test: Make surface demos reproducible by setting colormap to default at start of demo. Rik <octave@nomad.inbox5.com> parents: 14245 diff changeset	645 %! colormap ('default');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	646 %! plot ([0, 2]);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	647 %! colorbar ('eastoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	648 %! axis equal;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	649

Mercurial > octave-libtiff

annotate scripts/plot/colorbar.m @ 14247:c4fa5e0b6193