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

annotate scripts/plot/colorbar.m @ 10534:eb55e736060e

colorbar.m: Allow 'peer' option to be specified.

author	Ben Abbott <bpabbott@mac.com>
date	Mon, 19 Apr 2010 20:57:41 -0400
parents	568c7c041fac
children	95c3e38098bf

rev	line source
8920 eb63fbe60fab update copyright notices John W. Eaton <jwe@octave.org> parents: 8892 diff changeset	1 ## Copyright (C) 2008, 2009 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 --
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: 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{})
9040 dbd0c77e575e Cleanup documentation file plot.texi Rik <rdrider0-list@yahoo.com> parents: 8920 diff changeset	22 ## Adds 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.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	27 ## @item "East"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	28 ## Place the colorbar inside the plot to the right.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	29 ## @item "WestOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	30 ## Place the colorbar outside the plot to the left.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	31 ## @item "West"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	32 ## Place the colorbar inside the plot to the left.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	33 ## @item "NorthOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	34 ## Place the colorbar above the plot.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	35 ## @item "North"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	36 ## Place the colorbar at the top of the plot.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	37 ## @item "SouthOutside"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	38 ## Place the colorbar under the plot.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	39 ## @item "South"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	40 ## Place the colorbar at the bottom of the plot.
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	41 ## @item "Off", "None"
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	42 ## Remove any existing colorbar from the plot.
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	43 ## @end table
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	44 ##
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	45 ## 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	46 ## 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	47 ## @end deftypefn
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	48
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	49 function h = colorbar (varargin)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	50 ax = [];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	51 loc = "eastoutside";
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	52 args = {};
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	53 deleting = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	54
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	55 i = 1;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	56 while (i <= nargin)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	57 arg = varargin {i++};
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	58
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	59 if (ischar(arg))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	60 if (strcmpi (arg, "peer"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	61 if (i > nargin)
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	62 error ("colorbar: missing axes handle after \"peer\"");
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	63 else
10534 eb55e736060e colorbar.m: Allow 'peer' option to be specified. Ben Abbott <bpabbott@mac.com> parents: 10532 diff changeset	64 ax = varargin{i++};
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	65 if (!isscalar (ax) \|\| ! ishandle (ax)
10534 eb55e736060e colorbar.m: Allow 'peer' option to be specified. Ben Abbott <bpabbott@mac.com> parents: 10532 diff changeset	66 \|\| ! strcmp (get (ax, "type"), "axes"))
8507 cadc73247d65 style fixes John W. Eaton <jwe@octave.org> parents: 8236 diff changeset	67 error ("colorbar: expecting an axes handle following \"peer\"");
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	68 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	69 endif
8190 73d6b71788c0 use case-insensitive comparison for graphics properties; misc style fixes John W. Eaton <jwe@octave.org> parents: 8102 diff changeset	70 elseif (strcmpi (arg, "north") \|\| strcmpi (arg, "south")
73d6b71788c0 use case-insensitive comparison for graphics properties; misc style fixes John W. Eaton <jwe@octave.org> parents: 8102 diff changeset	71 \|\| strcmpi (arg, "east") \|\| strcmpi (arg, "west")
73d6b71788c0 use case-insensitive comparison for graphics properties; misc style fixes John W. Eaton <jwe@octave.org> parents: 8102 diff changeset	72 \|\| strcmpi (arg, "northoutside") \|\| strcmpi (arg, "southoutside")
73d6b71788c0 use case-insensitive comparison for graphics properties; misc style fixes John W. Eaton <jwe@octave.org> parents: 8102 diff changeset	73 \|\| strcmpi (arg, "eastoutside") \|\| strcmpi (arg, "westoutside"))
9262 de255681c85f colorbar: downcase location argument John W. Eaton <jwe@octave.org> parents: 9040 diff changeset	74 loc = tolower (arg);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	75 elseif (strcmpi (arg, "off") \|\| strcmpi (arg, "none"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	76 deleting = true;
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	77 else
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	78 args{end+1} = arg;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	79 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	80 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	81 args{end+1} = arg;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	82 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	83 endwhile
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	84
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	85 if (isempty (ax))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	86 ax = gca ();
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	87 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	88
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	89 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	90 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	91 set (0, "showhiddenhandles", "on")
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	92 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	93 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	94 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	95 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	96 unwind_protect_cleanup
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	97 set (0, "showhiddenhandles", 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	98 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	99
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	100 if (! deleting)
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 obj = get (ax);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	102 position = obj.position;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	103 clen = rows (get (get (ax, "parent"), "colormap"));
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	104 cext = get (ax, "clim");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	105 cdiff = (cext(2) - cext(1)) / clen / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	106 cmin = cext(1) + cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	107 cmax = cext(2) - cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	108
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	109 orig_pos = obj.position;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	110 orig_opos = obj.outerposition;
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	111 [pos, cpos, vertical, mirror] = ...
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	112 __position_colorbox__ (loc, obj, ancestor (ax, "figure"));
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	113 set (ax, "activepositionproperty", "position", "position", pos);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	114
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	115 cax = __go_axes__ (get (ax, "parent"), "tag", "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	116 "handlevisibility", "on",
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	117 "activepositionproperty", "position",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	118 "position", cpos);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	119 addproperty ("location", cax, "radio",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	120 "eastoutside\|east\|westoutside\|west\|northoutside\|north\|southoutside\|south",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	121 loc);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	122 addproperty ("axes", cax, "handle", ax);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	123
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	124 if (vertical)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	125 hi = image (cax, [0,1], [cmin, cmax], [1 : clen]');
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	126 if (mirror)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	127 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	128 "ylim", cext, "ylimmode", "manual",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	129 "yaxislocation", "right", args{:});
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	130 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	131 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	132 "ylim", cext, "ylimmode", "manual",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	133 "yaxislocation", "left", args{:});
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	134 endif
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	135 else
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	136 hi = image (cax, [cmin, cmax], [0,1], [1 : clen]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	137 if (mirror)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	138 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	139 "xlim", cext, "xlimmode", "manual",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	140 "xaxislocation", "top", args{:});
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	141 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	142 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	143 "xlim", cext, "xlimmode", "manual",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	144 "xaxislocation", "bottom", args{:});
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	145 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	146 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	147
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	148 ctext = text (0, 0, "", "tag", "colorbar","visible", "off",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	149 "handlevisibility", "off", "xliminclude", "off",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	150 "yliminclude", "off", "zliminclude", "off",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	151 "deletefcn", {@deletecolorbar, cax, orig_pos, orig_opos});
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	152
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	153 set (cax, "deletefcn", {@resetaxis, orig_pos, orig_opos});
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	154
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	155 addlistener (ax, "clim", {@update_colorbar_clim, hi, vertical})
10226 2884758e265b Replace dataaspectratio props with plotboxaspectratio props. Ben Abbott <bpabbott@mac.com> parents: 9297 diff changeset	156 addlistener (ax, "plotboxaspectratio", {@update_colorbar_axis, cax})
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	157 addlistener (ax, "plotboxaspectratiomode", {@update_colorbar_axis, cax})
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	158 addlistener (ax, "position", {@update_colorbar_axis, cax})
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	159
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	160 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	161
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	162 if (nargout > 0)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	163 h = cax;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	164 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	165 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	166
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	167 function deletecolorbar (h, d, hc, pos, opos)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	168 ## 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	169 ## parent figure is being deleted.
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	170 if (ishandle (hc) && strcmp (get (hc, "type"), "axes") &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	171 (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	172 if (strcmp (get (hc, "beingdeleted"), "off"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	173 delete (hc);
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 if (!isempty (ancestor (h, "axes")) &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	176 strcmp (get (ancestor (h, "axes"), "beingdeleted"), "off"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	177 set (ancestor (h, "axes"), "position", pos, "outerposition", opos);
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 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	180 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	181
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	182 function resetaxis (h, d, pos, opos)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	183 if (ishandle (h) && strcmp (get (h, "type"), "axes") &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	184 (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")) &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	185 ishandle (get (h, "axes")))
8228 53dbbd331498 Preserve font and position properties when axes are replace in the handle code David Bateman <dbateman@free.fr> parents: 8208 diff changeset	186 set (get (h, "axes"), "position", pos, "outerposition", opos);
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	187 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	188 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	189
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	190 function update_colorbar_clim (h, d, hi, vert)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	191 if (ishandle (h) && strcmp (get (h, "type"), "image") &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	192 (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	193 clen = rows (get (get (h, "parent"), "colormap"));
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	194 cext = get (h, "clim");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	195 cdiff = (cext(2) - cext(1)) / clen / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	196 cmin = cext(1) + cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	197 cmax = cext(2) - cdiff;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	198
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	199 if (vert)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	200 set (hi, "ydata", [cmin, cmax]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	201 set (get (hi, "parent"), "ylim", cext);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	202 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	203 set (hi, "xdata", [cmin, cmax]);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	204 set (get (hi, "parent"), "xlim", cext);
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 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	207 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	208
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	209 function update_colorbar_axis (h, d, cax)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	210 if (ishandle (cax) && strcmp (get (cax, "type"), "axes") &&
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	211 (isempty (gcbf()) \|\| strcmp (get (gcbf(), "beingdeleted"),"off")))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	212 loc = get (cax, "location");
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	213 obj = get (h);
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	214 [pos, cpos, vertical, mirror] = ...
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	215 __position_colorbox__ (loc, obj, ancestor (h, "figure"));
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 (vertical)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	218 if (mirror)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	219 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	220 "yaxislocation", "right", "position", cpos);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	221 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	222 set (cax, "xtick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	223 "yaxislocation", "left", "position", cpos);
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 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	226 if (mirror)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	227 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	228 "xaxislocation", "top", "position", cpos);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	229 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	230 set (cax, "ytick", [], "xdir", "normal", "ydir", "normal",
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	231 "xaxislocation", "bottom", "position", cpos);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	232 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	233 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	234
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	235 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	236 endfunction
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	237
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	238 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	239
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	240 pos = obj.position;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	241 sz = pos(3:4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	242
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	243 off = 0;
10226 2884758e265b Replace dataaspectratio props with plotboxaspectratio props. Ben Abbott <bpabbott@mac.com> parents: 9297 diff changeset	244 if (strcmpi (obj.plotboxaspectratiomode, "manual"))
2884758e265b Replace dataaspectratio props with plotboxaspectratio props. Ben Abbott <bpabbott@mac.com> parents: 9297 diff changeset	245 r = obj.plotboxaspectratio;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	246 if (pos(3) > pos(4))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	247 switch (cbox)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	248 case {"east", "eastoutside", "west", "westoutside"}
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	249 off = [(pos(3) - pos(4)) ./ (r(2) / r(1)), 0];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	250 endswitch
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	251 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	252 switch (cbox)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	253 case {"north", "northoutside", "south", "southoutside"}
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	254 off = [0, (pos(4) - pos(3)) ./ (r(1) / r(2))];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	255 ## This shouldn't be here except that gnuplot doesn't have a
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	256 ## square window and so a square aspect ratio is not square.
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	257 ## The corrections are empirical.
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	258 if (strcmp (get (cf, "__backend__"), "gnuplot"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	259 if (length (cbox) > 7 && strcmp (cbox(end-6:end),"outside"))
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	260 off = off / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	261 else
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	262 off = off / 1.7;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	263 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	264 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	265 endswitch
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	266 endif
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	267 off = off / 2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	268 endif
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	269
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	270 switch (cbox)
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	271 case "northoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	272 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	273 sz = sz .* [1.0, 0.06];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	274 pos(4) = 0.8 * pos(4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	275 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	276 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	277 case "north"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	278 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	279 sz = sz .* [1.0, 0.06] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	280 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	281 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	282 case "southoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	283 origin = pos(1:2) + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	284 sz = sz .* [1.0, 0.06];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	285 pos(2) = pos(2) + pos(4) * 0.2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	286 pos(4) = 0.8 * pos(4);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	287 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	288 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	289 case "south"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	290 origin = pos(1:2) + [0.05, 0.05] .* sz + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	291 sz = sz .* [1.0, 0.06] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	292 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	293 vertical = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	294 case "eastoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	295 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	296 sz = sz .* [0.06, 1.0];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	297 pos(3) = 0.8 * pos(3);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	298 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	299 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	300 case "east"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	301 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	302 sz = sz .* [0.06, 1.0] * 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	303 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	304 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	305 case "westoutside"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	306 origin = pos(1:2) + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	307 sz = sz .* [0.06, 1.0];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	308 pos(1) = pos(1) + pos(3) * 0.2;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	309 pos(3) = 0.8 * pos(3);
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	310 mirr = false;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	311 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	312 case "west"
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	313 origin = pos(1:2) + [0.05, 0.05] .* sz + off;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	314 sz = sz .* [0.06, 1.0] .* 0.9;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	315 mirr = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	316 vertical = true;
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	317 endswitch
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	318
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	319 cpos = [origin, sz];
f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	320
10226 2884758e265b Replace dataaspectratio props with plotboxaspectratio props. Ben Abbott <bpabbott@mac.com> parents: 9297 diff changeset	321 if (strcmpi (obj.plotboxaspectratiomode, "manual"))
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	322 obj.position = pos;
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	323 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	324 if (strfind (cbox, "outside"))
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	325 scale = 1.0;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	326 else
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	327 scale = 0.9;
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	328 endif
10532 568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	329 if (sz(1) > sz(2))
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	330 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	331 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	332 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	333 else
568c7c041fac colorbar.m: Consistent treatment of plotboxaspectratio. Add listener for plotboxaspectratiomode. Ben Abbott <bpabbott@mac.com> parents: 10226 diff changeset	334 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	335 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	336 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	337 endif
8208 f6ca8ff51818 [mq]: graphics-backend John W. Eaton <jwe@octave.org> parents: 8190 diff changeset	338 endif
8101 86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	339
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	340 endfunction
86955a1559c5 improve speed of cell2mat David Bateman <dbateman@free.fr> parents: 7726 diff changeset	341
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	342 %!demo
8790 a013ff655ca4 Trivial changes to demos to produce a more pleasant output for octave+gnuplot+aquaterm. Ben Abbott <bpabbott@mac.com> parents: 8746 diff changeset	343 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	344 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	345 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	346 %! colorbar();
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	347
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	348 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	349 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	350 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	351 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	352 %! colorbar("westoutside");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	353
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	354 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	355 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	356 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	357 %! imagesc(x)
10534 eb55e736060e colorbar.m: Allow 'peer' option to be specified. Ben Abbott <bpabbott@mac.com> parents: 10532 diff changeset	358 %! colorbar("peer", gca (), "northoutside");
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	359
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	360 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	361 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	362 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	363 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	364 %! colorbar("southoutside");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	365
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	366 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	367 %! clf
9281 02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	368 %! contour(peaks())
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	369 %! colorbar("west");
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	370
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	371 %!demo
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	372 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	373 %! subplot(2,2,1)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	374 %! contour(peaks())
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	375 %! colorbar("east");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	376 %! subplot(2,2,2)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	377 %! contour(peaks())
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	378 %! colorbar("west");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	379 %! subplot(2,2,3)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	380 %! contour(peaks())
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	381 %! colorbar("north");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	382 %! subplot(2,2,4)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	383 %! contour(peaks())
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	384 %! colorbar("south");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	385
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	386 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	387 %! clf
7189 e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	388 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	389 %! subplot(2,2,1)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	390 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	391 %! colorbar();
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	392 %! subplot(2,2,2)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	393 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	394 %! colorbar("westoutside");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	395 %! subplot(2,2,3)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	396 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	397 %! colorbar("northoutside");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	398 %! subplot(2,2,4)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	399 %! imagesc(x)
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	400 %! colorbar("southoutside");
e8d953d03f6a [project @ 2007-11-26 20:42:09 by dbateman] dbateman parents: diff changeset	401
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	402 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	403 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	404 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	405 %! subplot(1,2,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	406 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	407 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	408 %! colorbar();
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	409 %! subplot(1,2,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	410 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	411 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	412 %! colorbar("westoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	413
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	414 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	415 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	416 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	417 %! subplot(1,2,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	418 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	419 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	420 %! colorbar("northoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	421 %! subplot(1,2,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	422 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	423 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	424 %! colorbar("southoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	425
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	426 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	427 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	428 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	429 %! subplot(2,1,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	430 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	431 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	432 %! colorbar();
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	433 %! subplot(2,1,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	434 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	435 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	436 %! colorbar("westoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	437
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	438 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	439 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	440 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	441 %! subplot(2,1,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	442 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	443 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	444 %! colorbar("northoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	445 %! subplot(2,1,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	446 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	447 %! axis square;
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	448 %! colorbar("southoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	449
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	450 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	451 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	452 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	453 %! subplot(1,2,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	454 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	455 %! colorbar();
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	456 %! subplot(1,2,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	457 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	458 %! colorbar("westoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	459
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	460 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	461 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	462 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	463 %! subplot(1,2,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	464 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	465 %! colorbar("northoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	466 %! subplot(1,2,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	467 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	468 %! colorbar("southoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	469
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	470 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	471 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	472 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	473 %! subplot(2,1,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	474 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	475 %! colorbar();
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	476 %! subplot(2,1,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	477 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	478 %! colorbar("westoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	479
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	480 %!demo
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	481 %! clf
7726 1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	482 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	483 %! subplot(2,1,1)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	484 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	485 %! colorbar("northoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	486 %! subplot(2,1,2)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	487 %! imagesc(x)
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	488 %! colorbar("southoutside");
1b954fdaf4ff Try to get the colorbar position right for manual aspect ratios as well David Bateman <dbateman@free.fr> parents: 7264 diff changeset	489
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	490 %!demo
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	491 %! clf
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	492 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	493 %! subplot(1,2,1)
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	494 %! contour(x)
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	495 %! axis square;
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	496 %! colorbar("east");
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	497 %! xlim ([1, 64])
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	498 %! ylim ([1, 64])
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	499 %! subplot(1,2,2)
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	500 %! contour(x)
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	501 %! colorbar("west");
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	502 %! xlim ([1, 64])
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	503 %! ylim ([1, 64])
665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8790 diff changeset	504
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	505 %!demo
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	506 %! clf
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	507 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
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	508 %! contour (x)
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	509 %! xlim ([1, 64])
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	510 %! ylim ([1, 64])
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	511 %! 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	512 %! colorbar off
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	513
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	514 %!demo
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	515 %! clf
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	516 %! n = 64; x = kron (1:n,ones(n,1)); x = abs(x - x.');
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	517 %! contour (x)
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	518 %! xlim ([1, 64])
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	519 %! ylim ([1, 64])
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	520 %! 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	521 %! 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	522
9281 02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	523 %!demo
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	524 %! clf
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	525 %! imagesc (1./hilb(99));
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	526 %! h = colorbar;
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	527 %! set (h, 'yscale', 'log');
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	528
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	529 %!demo
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	530 %! clf
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	531 %! imagesc (log10 (1 ./ hilb (99)));
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	532 %! h = colorbar;
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	533 %! ytick = get(h, "ytick");
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	534 %! set (h, "yticklabel", sprintf ('10^{%g}\|', ytick));
02b16eeb3167 Fix yticklabels for log scale colorbar. Ben Abbott <bpabbott@mac.com> parents: 9262 diff changeset	535
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	536 %!demo
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	537 %! clf
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	538 %! n=5;x=linspace(0,5,n);y=linspace(0,1,n);
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	539 %! imagesc(1./hilb(n)); axis equal; colorbar
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	540
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	541 %!demo
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	542 %! clf
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	543 %! n=5;x=linspace(0,5,n);y=linspace(0,1,n);
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	544 %! imagesc(x,y,1./hilb(n)); axis equal; colorbar
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	545
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	546 %!demo
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	547 %! clf
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	548 %! n=5;x=linspace(0,5,n);y=linspace(0,1,n);
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	549 %! imagesc(y,x,1./hilb(n)); axis equal; colorbar
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	550 ## This requires that the axes position be properly determined for "axes equal"
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	551
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	552 %!demo
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	553 %! clf
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	554 %! axes
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	555 %! colorbar
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	556 %! hold on
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	557 %! contour(peaks)
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	558 %! hold off
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	559
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	560 %!demo
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	561 %! clf
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	562 %! plot([0, 2])
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	563 %! colorbar ("east")
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	564 %! axis square
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	565
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	566 %!demo
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	567 %! clf
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	568 %! plot([0, 2])
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	569 %! colorbar ("eastoutside")
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 %! axis square
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
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	572 %!demo
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	573 %! clf
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	574 %! plot([0, 2])
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	575 %! colorbar ("east")
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	576 %! axis equal
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	577
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	578 %!demo
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	579 %! clf
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	580 %! plot([0, 2])
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	581 %! colorbar ("eastoutside")
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	582 %! axis equal

Mercurial > octave-libtiff

annotate scripts/plot/colorbar.m @ 10534:eb55e736060e