octave: scripts/plot/legend.m annotate

annotate scripts/plot/legend.m @ 17281:bc924baa2c4e

doc: Add new @qcode macro for code samples which are quoted. Macro handles options ("on") or properties ("position") more elegantly than @code{"text"}. * doc/interpreter/macros.texi: Add new @qcode macro. * doc/interpreter/tips.txi: Add documentation about @qcode macro. * doc/interpreter/basics.txi, doc/interpreter/container.txi, doc/interpreter/emacs.txi, doc/interpreter/errors.txi, doc/interpreter/eval.txi, doc/interpreter/expr.txi, doc/interpreter/external.txi, doc/interpreter/func.txi, doc/interpreter/grammar.txi, doc/interpreter/image.txi, doc/interpreter/install.txi, doc/interpreter/interp.txi, doc/interpreter/io.txi, doc/interpreter/matrix.txi, doc/interpreter/numbers.txi, doc/interpreter/oop.txi, doc/interpreter/package.txi, doc/interpreter/plot.txi, doc/interpreter/quad.txi, doc/interpreter/sparse.txi, doc/interpreter/strings.txi, doc/interpreter/system.txi, doc/interpreter/vectorize.txi, libinterp/corefcn/balance.cc, libinterp/corefcn/bitfcns.cc, libinterp/corefcn/cellfun.cc, libinterp/corefcn/conv2.cc, libinterp/corefcn/data.cc, libinterp/corefcn/debug.cc, libinterp/corefcn/defaults.cc, libinterp/corefcn/dirfns.cc, libinterp/corefcn/dlmread.cc, libinterp/corefcn/error.cc, libinterp/corefcn/file-io.cc, libinterp/corefcn/find.cc, libinterp/corefcn/gammainc.cc, libinterp/corefcn/graphics.cc, libinterp/corefcn/help.cc, libinterp/corefcn/hex2num.cc, libinterp/corefcn/input.cc, libinterp/corefcn/load-path.cc, libinterp/corefcn/load-save.cc, libinterp/corefcn/ls-oct-ascii.cc, libinterp/corefcn/lu.cc, libinterp/corefcn/luinc.cc, libinterp/corefcn/matrix_type.cc, libinterp/corefcn/oct-hist.cc, libinterp/corefcn/pager.cc, libinterp/corefcn/pr-output.cc, libinterp/corefcn/pt-jit.cc, libinterp/corefcn/qz.cc, libinterp/corefcn/rand.cc, libinterp/corefcn/regexp.cc, libinterp/corefcn/schur.cc, libinterp/corefcn/sighandlers.cc, libinterp/corefcn/sparse.cc, libinterp/corefcn/spparms.cc, libinterp/corefcn/str2double.cc, libinterp/corefcn/svd.cc, libinterp/corefcn/symtab.cc, libinterp/corefcn/syscalls.cc, libinterp/corefcn/toplev.cc, libinterp/corefcn/tril.cc, libinterp/corefcn/typecast.cc, libinterp/corefcn/utils.cc, libinterp/corefcn/variables.cc, libinterp/dldfcn/__init_fltk__.cc, libinterp/dldfcn/chol.cc, libinterp/dldfcn/colamd.cc, libinterp/dldfcn/fftw.cc, libinterp/dldfcn/qr.cc, libinterp/dldfcn/symbfact.cc, libinterp/octave-value/ov-base.cc, libinterp/octave-value/ov-fcn-handle.cc, libinterp/octave-value/ov-fcn-inline.cc, libinterp/octave-value/ov-java.cc, libinterp/octave-value/ov-range.cc, libinterp/octave-value/ov-struct.cc, libinterp/octave-value/ov-usr-fcn.cc, libinterp/parse-tree/oct-parse.in.yy, libinterp/parse-tree/pt-binop.cc, libinterp/parse-tree/pt-eval.cc, libinterp/parse-tree/pt-mat.cc, scripts/@ftp/ftp.m, scripts/deprecated/java_convert_matrix.m, scripts/deprecated/java_debug.m, scripts/deprecated/java_unsigned_conversion.m, scripts/deprecated/shell_cmd.m, scripts/general/dblquad.m, scripts/general/display.m, scripts/general/genvarname.m, scripts/general/idivide.m, scripts/general/interp1.m, scripts/general/interp2.m, scripts/general/interp3.m, scripts/general/interpn.m, scripts/general/isa.m, scripts/general/profexplore.m, scripts/general/profile.m, scripts/general/quadgk.m, scripts/general/randi.m, scripts/general/structfun.m, scripts/general/subsindex.m, scripts/general/triplequad.m, scripts/geometry/griddata.m, scripts/geometry/griddata3.m, scripts/geometry/griddatan.m, scripts/geometry/voronoi.m, scripts/help/help.m, scripts/help/lookfor.m, scripts/image/cmpermute.m, scripts/image/colormap.m, scripts/image/image.m, scripts/image/imagesc.m, scripts/image/imfinfo.m, scripts/image/imformats.m, scripts/image/imread.m, scripts/image/imshow.m, scripts/image/imwrite.m, scripts/image/ind2gray.m, scripts/image/lines.m, scripts/image/rgb2ind.m, scripts/image/spinmap.m, scripts/io/dlmwrite.m, scripts/io/strread.m, scripts/io/textread.m, scripts/io/textscan.m, scripts/java/javaclasspath.m, scripts/java/usejava.m, scripts/miscellaneous/bzip2.m, scripts/miscellaneous/computer.m, scripts/miscellaneous/copyfile.m, scripts/miscellaneous/debug.m, scripts/miscellaneous/dos.m, scripts/miscellaneous/edit.m, scripts/miscellaneous/gzip.m, scripts/miscellaneous/license.m, scripts/miscellaneous/mkoctfile.m, scripts/miscellaneous/movefile.m, scripts/miscellaneous/parseparams.m, scripts/miscellaneous/unix.m, scripts/optimization/fminbnd.m, scripts/optimization/fminsearch.m, scripts/optimization/fminunc.m, scripts/optimization/fsolve.m, scripts/optimization/fzero.m, scripts/optimization/glpk.m, scripts/optimization/lsqnonneg.m, scripts/optimization/optimset.m, scripts/optimization/pqpnonneg.m, scripts/pkg/pkg.m, scripts/plot/allchild.m, scripts/plot/ancestor.m, scripts/plot/area.m, scripts/plot/axis.m, scripts/plot/bar.m, scripts/plot/barh.m, scripts/plot/box.m, scripts/plot/caxis.m, scripts/plot/cla.m, scripts/plot/clabel.m, scripts/plot/clf.m, scripts/plot/close.m, scripts/plot/colorbar.m, scripts/plot/daspect.m, scripts/plot/ezmesh.m, scripts/plot/ezmeshc.m, scripts/plot/ezsurf.m, scripts/plot/ezsurfc.m, scripts/plot/findall.m, scripts/plot/findobj.m, scripts/plot/gcbo.m, scripts/plot/gcf.m, scripts/plot/gco.m, scripts/plot/grid.m, scripts/plot/guihandles.m, scripts/plot/hdl2struct.m, scripts/plot/hidden.m, scripts/plot/hold.m, scripts/plot/isonormals.m, scripts/plot/isosurface.m, scripts/plot/legend.m, scripts/plot/mesh.m, scripts/plot/meshc.m, scripts/plot/meshz.m, scripts/plot/newplot.m, scripts/plot/orient.m, scripts/plot/pareto.m, scripts/plot/patch.m, scripts/plot/pbaspect.m, scripts/plot/pcolor.m, scripts/plot/plot.m, scripts/plot/print.m, scripts/plot/private/__add_default_menu__.m, scripts/plot/quiver.m, scripts/plot/quiver3.m, scripts/plot/refreshdata.m, scripts/plot/saveas.m, scripts/plot/scatter.m, scripts/plot/scatter3.m, scripts/plot/shading.m, scripts/plot/shrinkfaces.m, scripts/plot/slice.m, scripts/plot/stem.m, scripts/plot/stem3.m, scripts/plot/struct2hdl.m, scripts/plot/subplot.m, scripts/plot/surf.m, scripts/plot/surfc.m, scripts/plot/surfl.m, scripts/plot/tetramesh.m, scripts/plot/uigetfile.m, scripts/plot/uimenu.m, scripts/plot/uiputfile.m, scripts/plot/waterfall.m, scripts/plot/whitebg.m, scripts/plot/xlim.m, scripts/plot/ylim.m, scripts/plot/zlim.m, scripts/polynomial/conv.m, scripts/polynomial/polyout.m, scripts/polynomial/splinefit.m, scripts/set/ismember.m, scripts/set/powerset.m, scripts/set/setdiff.m, scripts/set/union.m, scripts/set/unique.m, scripts/signal/detrend.m, scripts/signal/filter2.m, scripts/signal/freqz.m, scripts/signal/periodogram.m, scripts/signal/spectral_adf.m, scripts/signal/spectral_xdf.m, scripts/sparse/eigs.m, scripts/sparse/svds.m, scripts/specfun/legendre.m, scripts/special-matrix/gallery.m, scripts/statistics/base/mean.m, scripts/statistics/base/moment.m, scripts/statistics/tests/cor_test.m, scripts/statistics/tests/kolmogorov_smirnov_test.m, scripts/statistics/tests/kolmogorov_smirnov_test_2.m, scripts/statistics/tests/kruskal_wallis_test.m, scripts/statistics/tests/prop_test_2.m, scripts/statistics/tests/sign_test.m, scripts/statistics/tests/t_test.m, scripts/statistics/tests/t_test_2.m, scripts/statistics/tests/t_test_regression.m, scripts/statistics/tests/u_test.m, scripts/statistics/tests/var_test.m, scripts/statistics/tests/welch_test.m, scripts/statistics/tests/wilcoxon_test.m, scripts/statistics/tests/z_test.m, scripts/statistics/tests/z_test_2.m, scripts/strings/base2dec.m, scripts/strings/index.m, scripts/strings/isstrprop.m, scripts/strings/mat2str.m, scripts/strings/regexptranslate.m, scripts/strings/rindex.m, scripts/strings/str2num.m, scripts/strings/strcat.m, scripts/strings/strjust.m, scripts/strings/strmatch.m, scripts/strings/validatestring.m, scripts/testfun/demo.m, scripts/testfun/example.m, scripts/testfun/test.m, scripts/time/addtodate.m, scripts/time/asctime.m, scripts/time/datestr.m, scripts/time/datetick.m, scripts/time/weekday.m, scripts/ui/errordlg.m, scripts/ui/helpdlg.m, scripts/ui/inputdlg.m, scripts/ui/listdlg.m, scripts/ui/msgbox.m, scripts/ui/questdlg.m, scripts/ui/warndlg.m: Use new @qcode macro.

author	Rik <rik@octave.org>
date	Mon, 19 Aug 2013 20:46:38 -0700
parents	d87179b38bcf
children	d99785217634

rev	line source
14138 72c96de7a403 maint: update copyright notices for 2012 John W. Eaton <jwe@octave.org> parents: 13979 diff changeset	1 ## Copyright (C) 2010-2012 David Bateman
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	2 ##
6440 98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	3 ## This file is part of Octave.
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	4 ##
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	5 ## Octave is free software; you can redistribute it and/or modify it
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	6 ## under the terms of the GNU General Public License as published by
7016 93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 7001 diff changeset	7 ## the Free Software Foundation; either version 3 of the License, or (at
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 7001 diff changeset	8 ## your option) any later version.
6440 98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	9 ##
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	10 ## Octave is distributed in the hope that it will be useful, but
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	11 ## WITHOUT ANY WARRANTY; without even the implied warranty of
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
98ee80702bca [project @ 2007-03-23 15:13:19 by jwe] jwe parents: 6395 diff changeset	13 ## General Public License for more details.
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	14 ##
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	15 ## You should have received a copy of the GNU General Public License
7016 93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 7001 diff changeset	16 ## along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 7001 diff changeset	17 ## <http://www.gnu.org/licenses/>.
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	18
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	19 ## -- texinfo --
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	20 ## @deftypefn {Function File} {} legend (@var{str1}, @var{str2}, @dots{})
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	21 ## @deftypefnx {Function File} {} legend (@var{matstr})
14755 bf759828760c doc: Clarify input must be cellstr, not just cell, to legend(). Rik <octave@nomad.inbox5.com> parents: 14747 diff changeset	22 ## @deftypefnx {Function File} {} legend (@var{cellstr})
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	23 ## @deftypefnx {Function File} {} legend (@dots{}, "location", @var{pos})
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	24 ## @deftypefnx {Function File} {} legend (@dots{}, "orientation", @var{orient})
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	25 ## @deftypefnx {Function File} {} legend (@var{hax}, @dots{})
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	26 ## @deftypefnx {Function File} {} legend (@var{hobjs}, @dots{})
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	27 ## @deftypefnx {Function File} {} legend (@var{hax}, @var{hobjs}, @dots{})
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	28 ## @deftypefnx {Function File} {} legend ("@var{option}")
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	29 ## @deftypefnx {Function File} {[@var{hleg}, @var{hleg_obj}, @var{hplot}, @var{labels}] =} legend (@dots{})
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	30 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	31 ## Display a legend for the current axes using the specified strings as labels.
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	32 ##
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	33 ## Legend entries may be specified as individual character string arguments,
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	34 ## a character array, or a cell array of character strings.
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	35 ##
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	36 ## If the first argument @var{hax} is an axes handle, then plot into this axis,
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	37 ## rather than the current axes returned by @code{gca}. If the handles,
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	38 ## @var{hobjs}, are not specified then the legend's strings will be associated
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	39 ## with the axes' descendants. @code{legend} works on line graphs,
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	40 ## bar graphs, etc. A plot must exist before legend is called.
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	41 ##
6895 76e3d985ae56 [project @ 2007-09-13 18:22:38 by jwe] jwe parents: 6740 diff changeset	42 ## The optional parameter @var{pos} specifies the location of the legend
76e3d985ae56 [project @ 2007-09-13 18:22:38 by jwe] jwe parents: 6740 diff changeset	43 ## as follows:
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	44 ##
6977 e78e31f0a236 [project @ 2007-10-08 19:09:32 by jwe] jwe parents: 6895 diff changeset	45 ## @multitable @columnfractions 0.06 0.14 0.80
17204 d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	46 ## @headitem @tab pos @tab location of the legend
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	47 ## @item @tab north @tab center top
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	48 ## @item @tab south @tab center bottom
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	49 ## @item @tab east @tab right center
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	50 ## @item @tab west @tab left center
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	51 ## @item @tab northeast @tab right top (default)
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	52 ## @item @tab northwest @tab left top
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	53 ## @item @tab southeast @tab right bottom
d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	54 ## @item @tab southwest @tab left bottom
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	55 ## @item
17204 d87179b38bcf doc: Touch up alignment of @multitables in plot, legend, newplot. Rik <rik@octave.org> parents: 17190 diff changeset	56 ## @item @tab outside @tab can be appended to any location string
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	57 ## @end multitable
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	58 ##
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	59 ## The optional parameter @var{orient} determines if the key elements
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	60 ## are placed vertically or horizontally. The allowed values are
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	61 ## @qcode{"vertical"} (default) or @qcode{"horizontal"}.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	62 ##
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	63 ## The following customizations are available using @var{option}:
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	64 ##
7148 735086cfd405 [project @ 2007-11-09 18:01:44 by jwe] jwe parents: 7054 diff changeset	65 ## @table @asis
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	66 ## @item @qcode{"show"}
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	67 ## Show legend on the plot
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10666 diff changeset	68 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	69 ## @item @qcode{"hide"}
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	70 ## Hide legend on the plot
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10666 diff changeset	71 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	72 ## @item @qcode{"toggle"}
bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	73 ## Toggles between @qcode{"hide"} and @qcode{"show"}
12394 c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	74 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	75 ## @item @qcode{"boxon"}
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	76 ## Show a box around legend
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10666 diff changeset	77 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	78 ## @item @qcode{"boxoff"}
10666 7a43499f074a legend.m: Improve documentation string Rik <octave@nomad.inbox5.com> parents: 10662 diff changeset	79 ## Hide the box around legend
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10666 diff changeset	80 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	81 ## @item @qcode{"left"}
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	82 ## Place label text to the left of the keys
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10666 diff changeset	83 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	84 ## @item @qcode{"right"}
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	85 ## Place label text to the right of the keys
12394 c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	86 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	87 ## @item @qcode{"off"}
12394 c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	88 ## Delete the legend object
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	89 ## @end table
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	90 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	91 ## The optional output values are
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	92 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	93 ## @table @var
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	94 ## @item hleg
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	95 ## The graphics handle of the legend object.
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	96 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	97 ## @item hleg_obj
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	98 ## Graphics handles to the text and line objects which make up the legend.
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	99 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	100 ## @item hplot
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	101 ## Graphics handles to the plot objects which were used in making the legend.
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	102 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	103 ## @item labels
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	104 ## A cell array of strings of the labels in the legend.
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	105 ## @end table
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	106 ##
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	107 ## The legend label text is either provided in the call to @code{legend} or
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	108 ## is taken from the DisplayName property of graphics objects. If no
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	109 ## labels or DisplayNames are available, then the label text is simply
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	110 ## @qcode{"data1"}, @qcode{"data2"}, @dots{}, @nospell{@qcode{"dataN"}}.
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	111 ##
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 17119 diff changeset	112 ## Implementation Note: A legend is implemented as an additional axes object
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	113 ## of the current figure with the @qcode{"tag"} set to @qcode{"legend"}.
bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	114 ## Properties of the legend object may be manipulated directly by using
bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 17204 diff changeset	115 ## @code{set}.
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	116 ## @end deftypefn
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	117
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	118 function [hlegend2, hobjects2, hplot2, text_strings2] = legend (varargin)
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	119
11246 c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	120 if (nargin > 0
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	121 && (! ishandle (varargin{1})
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	122 \|\| (strcmp (get (varargin{1}, "type"), "axes")
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	123 && ! strcmp (get (varargin{1}, "tag"), "legend"))))
17065 991e8a386aa3 legend.m: Update to use new __plt_get_axis_arg__. Rik <rik@octave.org> parents: 16973 diff changeset	124 [ca, varargin, nargin] = __plt_get_axis_arg__ ("legend", varargin{:});
991e8a386aa3 legend.m: Update to use new __plt_get_axis_arg__. Rik <rik@octave.org> parents: 16973 diff changeset	125 if (isempty (ca))
991e8a386aa3 legend.m: Update to use new __plt_get_axis_arg__. Rik <rik@octave.org> parents: 16973 diff changeset	126 ca = gca ();
991e8a386aa3 legend.m: Update to use new __plt_get_axis_arg__. Rik <rik@octave.org> parents: 16973 diff changeset	127 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	128 fig = get (ca, "parent");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	129 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	130 fig = get (0, "currentfigure");
11246 c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	131 if (isempty (fig))
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	132 fig = gcf ();
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	133 endif
c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	134 ca = gca ();
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	135 endif
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	136
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	137 ## Special handling for plotyy which has two axes objects
13216 434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	138 if (ishandle (ca) && isprop (ca, "__plotyy_axes__"))
434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	139 plty = get (ca, "__plotyy_axes__");
434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	140 if (isscalar (plty) && ishandle (plty))
11199 91c606a68693 minor fix to previous changeset David Bateman <dbateman@free.fr> parents: 11198 diff changeset	141 ca = [ca, plty];
13216 434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	142 elseif (iscell (plty))
11199 91c606a68693 minor fix to previous changeset David Bateman <dbateman@free.fr> parents: 11198 diff changeset	143 ca = [ca, plty{:}];
13216 434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	144 elseif (all (ishandle (plty)))
434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	145 ca = [ca, plty(:).'];
434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	146 else
15202 f3b5cadfd6d5 fix missing semicolons in various .m files John W. Eaton <jwe@octave.org> parents: 14868 diff changeset	147 error ("legend.m: This should not happen. File a bug report.");
11199 91c606a68693 minor fix to previous changeset David Bateman <dbateman@free.fr> parents: 11198 diff changeset	148 endif
13216 434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	149 ## Remove duplicates while preserving order
434e227b100b Improvements to plotyy. Ben Abbott <bpabbott@mac.com> parents: 13141 diff changeset	150 [~, n] = unique (ca);
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	151 ca = ca(sort (n));
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	152 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	153
11246 c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	154 if (nargin > 0 && all (ishandle (varargin{1})))
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	155 kids = flipud (varargin{1}(:));
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	156 varargin(1) = [];
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	157 else
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	158 kids = ca;
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	159 kids(strcmp (get (ca, "tag"), "legend")) = [];
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	160 if (isscalar (kids))
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14846 diff changeset	161 kids = get (kids, "children")(:);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	162 else
14207 57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	163 kids = flipud ([get(kids, "children"){:}](:));
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	164 endif
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	165 endif
11246 c463aed850b0 allow legend and gcf to work when no figure is present John W. Eaton <jwe@octave.org> parents: 11200 diff changeset	166 nargs = numel (varargin);
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	167 nkids = numel (kids);
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	168
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	169 orientation = "default";
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	170 location = "default";
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	171 show = "create";
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	172 textpos = "default";
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	173 box = "default";
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	174
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	175 ## Process old way of specifying location with a number rather than a string.
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	176 if (nargs > 0)
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	177 pos = varargin{nargs};
13279 984359717d71 Use common code idiom for checking whether a double value is an integer. Rik <octave@nomad.inbox5.com> parents: 13216 diff changeset	178 if (isnumeric (pos) && isscalar (pos) && pos == fix (pos))
6395 a8dd70bacc1e [project @ 2007-03-07 22:22:12 by jwe] jwe parents: 6272 diff changeset	179 if (pos >= -1 && pos <= 4)
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	180 location = [{"northeastoutside", "best", "northeast",
11003 b1cfff739af5 legend.m: Index location cellstr to obtain a string. Ben Abbott <bpabbott@mac.com> parents: 10999 diff changeset	181 "northwest", "southwest", "southeast"}] {pos + 2};
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	182 nargs--;
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	183 else
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	184 error ("legend: invalid location specified");
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	185 endif
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	186 endif
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	187 endif
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	188
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	189 ## Find location and orientation property/value pairs
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	190 while (nargs > 1)
6977 e78e31f0a236 [project @ 2007-10-08 19:09:32 by jwe] jwe parents: 6895 diff changeset	191 pos = varargin{nargs-1};
7054 1c5b2b5b58ba [project @ 2007-10-23 23:22:16 by jwe] jwe parents: 7017 diff changeset	192 str = varargin{nargs};
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	193 if (strcmpi (pos, "location") && ischar (str))
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	194 location = lower (str);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	195 nargs -= 2;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	196 elseif (strcmpi (pos, "orientation") && ischar (str))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	197 orientation = lower (str);
10989 6ea65c5de87a Respect the units and paperunits figure properties and the units and fontunits axes properties David Bateman <dbateman@free.fr> parents: 10949 diff changeset	198 nargs -= 2;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	199 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	200 break;
6977 e78e31f0a236 [project @ 2007-10-08 19:09:32 by jwe] jwe parents: 6895 diff changeset	201 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	202 endwhile
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	203
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	204 ## Validate the orientation
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	205 switch (orientation)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	206 case {"vertical", "horizontal", "default"}
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	207 ## These are all accepted orientations.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	208 otherwise
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	209 error ("legend: unrecognized legend orientation");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	210 endswitch
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	211
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	212 ## Validate the location type
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	213 outside = false;
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	214 inout = strfind (location, "outside");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	215 if (! isempty (inout))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	216 outside = true;
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	217 location = location(1:inout-1);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	218 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	219 outside = false;
6977 e78e31f0a236 [project @ 2007-10-08 19:09:32 by jwe] jwe parents: 6895 diff changeset	220 endif
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	221
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	222 switch (location)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	223 case {"north", "south", "east", "west", "northeast", "northwest", ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	224 "southeast", "southwest", "default"}
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	225 case "best"
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	226 warning ("legend: 'best' not yet implemented for location specifier\n");
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	227 location = "northeast";
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	228 otherwise
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	229 error ("legend: unrecognized legend location");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	230 endswitch
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	231
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	232 ## Find any existing legend object on figure
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	233 hlegend = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	234 fkids = get (fig, "children");
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14846 diff changeset	235 for i = 1 : numel (fkids)
17125 b5d6314314fc Change various plot functions to take advantage of new isaxes() function. Rik <rik@octave.org> parents: 17122 diff changeset	236 if ( strcmp (get (fkids(i), "type"), "axes")
b5d6314314fc Change various plot functions to take advantage of new isaxes() function. Rik <rik@octave.org> parents: 17122 diff changeset	237 && strcmp (get (fkids(i), "tag"), "legend"))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	238 udata = get (fkids(i), "userdata");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	239 if (! isempty (intersect (udata.handle, ca)))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	240 hlegend = fkids(i);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	241 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	242 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	243 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	244 endfor
6257 44c91c5dfe1d [project @ 2007-01-30 19:16:52 by jwe] jwe parents: 6163 diff changeset	245
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	246 if (nargs == 1)
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	247 arg = varargin{1};
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	248 if (ischar (arg))
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	249 if (rows (arg) == 1)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	250 str = tolower (strtrim (arg));
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	251 switch (str)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	252 case "off"
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	253 delete (hlegend);
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	254 return;
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	255 case "hide"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	256 show = "off";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	257 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	258 case "show"
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	259 if (! isempty (hlegend))
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	260 show = "on";
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	261 else
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	262 show = "create";
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	263 textpos = "left";
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	264 endif
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	265 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	266 case "toggle"
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	267 if (isempty (hlegend))
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	268 show = "create";
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	269 textpos = "left";
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	270 elseif (strcmp (get (hlegend, "visible"), "off"))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	271 show = "on";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	272 else
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	273 show = "off";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	274 endif
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	275 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	276 case "boxon"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	277 box = "on";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	278 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	279 case "boxoff"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	280 box = "off";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	281 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	282 case "left"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	283 textpos = "left";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	284 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	285 case "right"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	286 textpos = "right";
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	287 nargs--;
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	288 endswitch
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	289 else
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	290 ## Character matrix of labels
10549 95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	291 varargin = cellstr (arg);
95c3e38098bf Untabify .m scripts Rik <code@nomad.inbox5.com> parents: 9457 diff changeset	292 nargs = numel (varargin);
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	293 endif
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	294 elseif (iscellstr (arg))
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	295 ## Cell array of labels
8529 774b44619c5c Fix legend order for both horizontal and vertical string cell. Daniel J Sebald <daniel.sebald@ieee.org> parents: 8343 diff changeset	296 varargin = arg;
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	297 nargs = numel (varargin);
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	298 else
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	299 error ("legend: expecting argument to be a character string");
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	300 endif
14589 fd6e50e2eee6 legend() should accept labels being specified as both cellstrs and char. Ben Abbott <bpabbott@mac.com> parents: 14585 diff changeset	301 elseif (nargs > 1 && iscellstr (varargin{1}))
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	302 ## Cell array of labels followed by property/value pairs
14589 fd6e50e2eee6 legend() should accept labels being specified as both cellstrs and char. Ben Abbott <bpabbott@mac.com> parents: 14585 diff changeset	303 varargin = {varargin{1}{:}, varargin{2:end}};
fd6e50e2eee6 legend() should accept labels being specified as both cellstrs and char. Ben Abbott <bpabbott@mac.com> parents: 14585 diff changeset	304 nargs = numel (varargin);
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	305 endif
1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	306
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	307 have_labels = (nargs > 0);
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	308
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	309 if (strcmp (show, "off"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	310 if (! isempty (hlegend))
14578 f579a94aacaa Preserve legend handle when changing properties (Bug # 36259). Carnë Draug <carandraug+dev@gmail.com> parents: 14552 diff changeset	311 set (findobj (hlegend), "visible", "off");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	312 hlegend = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	313 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	314 hobjects = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	315 hplots = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	316 text_strings = {};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	317 elseif (strcmp (show, "on"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	318 if (! isempty (hlegend))
14578 f579a94aacaa Preserve legend handle when changing properties (Bug # 36259). Carnë Draug <carandraug+dev@gmail.com> parents: 14552 diff changeset	319 set (findobj (hlegend), "visible", "on");
14585 c38a253723d3 Syncrhonize legend's "visible" and "box" properties. (Bug # 36136) Ben Abbott <bpabbott@mac.com> parents: 14581 diff changeset	320 ## NOTE - Matlab sets both "visible", and "box" to "on"
c38a253723d3 Syncrhonize legend's "visible" and "box" properties. (Bug # 36136) Ben Abbott <bpabbott@mac.com> parents: 14581 diff changeset	321 set (hlegend, "visible", get (hlegend, "box"));
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	322 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	323 hobjects = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	324 hplots = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	325 text_strings = {};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	326 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	327 elseif (strcmp (box, "on"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	328 if (! isempty (hlegend))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	329 set (hlegend, "box", "on", "visible", "on");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	330 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	331 elseif (strcmp (box, "off"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	332 if (! isempty (hlegend))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	333 set (hlegend, "box", "off", "visible", "off");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	334 endif
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	335 elseif (! have_labels && !(strcmp (location, "default") &&
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	336 strcmp (orientation, "default")))
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	337 ## Changing location or orientation of existing legend
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	338 if (! isempty (hlegend))
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	339 hax = getfield (get (hlegend, "userdata"), "handle");
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	340 [hplots, text_strings] = __getlegenddata__ (hlegend);
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	341
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	342 if (strcmp (location, "default"))
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	343 h = legend (hax, hplots, text_strings, "orientation", orientation);
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	344 elseif (strcmp (orientation, "default"))
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	345 if (outside)
13141 e81ddf9cacd5 maint: untabify and remove trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 12440 diff changeset	346 h = legend (hax, hplots, text_strings, "location",
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	347 strcat (location, "outside"));
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	348 else
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	349 h = legend (hax, hplots, text_strings, "location", location);
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	350 endif
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	351 else
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	352 if (outside)
13141 e81ddf9cacd5 maint: untabify and remove trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 12440 diff changeset	353 h = legend (hax, hplots, text_strings, "location",
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	354 strcat (location, "outside"), "orientation", orientation);
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	355 else
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	356 h = legend (hax, hplots, text_strings, "location", location,
12398 735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	357 "orientation", orientation);
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	358 endif
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	359 endif
735e43b75e45 Allow the legend location and orientation to be set without modifying the legend keys (#32374) David Bateman <dbateman@free.fr> parents: 12396 diff changeset	360 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	361 else
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	362 ## Create new legend
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	363 hobjects = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	364 hplots = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	365 text_strings = {};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	366
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	367 if (have_labels)
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	368 ## Check for valid data that can be labeled.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	369 have_data = false;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	370 have_dname = false;
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	371 for k = 1 : nkids
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	372 typ = get (kids(k), "type");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	373 if (strcmp (typ, "line") \|\| strcmp (typ, "surface")
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	374 \|\| strcmp (typ, "patch") \|\| strcmp (typ, "hggroup"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	375 have_data = true;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	376 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	377 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	378 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	379
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	380 if (! have_data)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	381 warning ("legend: plot data is empty; setting key labels has no effect");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	382 endif
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	383 else
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	384 ## No labels. Search for DisplayName property.
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	385 have_dname = false;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	386 for k = 1 : nkids
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	387 hkid = kids(k);
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	388 typ = get (hkid, "type");
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	389 if (strcmp (typ, "line") \|\| strcmp (typ, "surface")
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	390 \|\| strcmp (typ, "patch"))
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	391 if (! isempty (get (hkid, "displayname")))
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	392 have_dname = true;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	393 break;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	394 endif
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	395 elseif (strcmp (typ, "hggroup"))
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	396 hgkids = get (hkid, "children");
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	397 for j = 1 : length (hgkids)
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	398 hgobj = get (hgkids(j));
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	399 if (isfield (hgobj, "displayname") && ! isempty (hgobj.displayname))
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	400 have_dname = true;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	401 break; # break from j-loop over hgkids
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	402 endif
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	403 endfor
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	404 if (have_dname)
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	405 break; # break from k loop over nkids
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	406 endif
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	407 endif # elseif hggroup
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	408 endfor # for loop k = 1 : nkids
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	409 endif # else branch of if (have_labels)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	410
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	411 if (have_labels \|\| ! have_dname)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	412 k = nkids;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	413 if (! have_labels)
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	414 varargin = arrayfun (@(x) sprintf ("data%d", x), [1:nkids]',
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	415 "uniformoutput", false);
16795 38c1a421f082 When no keys are specified and defaults are populated, set have_labels = true. Ben Abbott <bpabbott@mac.com> parents: 16728 diff changeset	416 have_labels = true;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	417 nargs = nkids;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	418 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	419 for i = 1 : nargs
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	420 arg = varargin{i};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	421 if (ischar (arg))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	422 typ = get (kids(k), "type");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	423 while (k > 0
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	424 && ! (strcmp (typ, "line") \|\| strcmp (typ, "surface")
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	425 \|\| strcmp (typ, "patch") \|\| strcmp (typ, "hggroup")))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	426 typ = get (kids(--k), "type");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	427 endwhile
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	428 if (k > 0)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	429 if (strcmp (get (kids(k), "type"), "hggroup"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	430 hgkids = get (kids(k), "children");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	431 for j = 1 : length (hgkids)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	432 hgobj = get (hgkids(j));
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	433 if (isfield (hgobj, "displayname"))
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	434 if (have_labels)
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	435 set (hgkids(j), "displayname", arg);
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	436 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	437 hplots = [hplots, hgkids(j)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	438 text_strings = {text_strings{:}, arg};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	439 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	440 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	441 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	442 else
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	443 if (have_labels)
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	444 set (kids(k), "displayname", arg);
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	445 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	446 hplots = [hplots, kids(k)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	447 text_strings = {text_strings{:}, arg};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	448 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	449
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	450 if (--k == 0)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	451 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	452 endif
15441 e5a07d7aafcc legend.m: Remove unused warning variable and associated code. Rik <rik@octave.org> parents: 15440 diff changeset	453 else
e5a07d7aafcc legend.m: Remove unused warning variable and associated code. Rik <rik@octave.org> parents: 15440 diff changeset	454 break; # k = 0, no further handles to process
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	455 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	456 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	457 error ("legend: expecting argument to be a character string");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	458 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	459 endfor
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	460 if (have_labels && i < nargs)
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	461 warning ("legend: ignoring extra labels");
f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	462 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	463 else
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	464 ## No labels specified but objects have DisplayName property set.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	465 k = nkids;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	466 while (k > 0)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	467 typ = get (kids(k), "type");
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	468 while (k > 1
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	469 && ! (strcmp (typ, "line") \|\| strcmp (typ, "surface")
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	470 \|\| strcmp (typ, "patch") \|\| strcmp (typ, "hggroup")))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	471 typ = get (kids(--k), "type");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	472 endwhile
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	473 if (! (strcmp (typ, "line") \|\| strcmp (typ, "surface")
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	474 \|\| strcmp (typ, "patch") \|\| strcmp (typ, "hggroup")))
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	475 break;
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	476 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	477 if (k > 0)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	478 if (strcmp (get (kids(k), "type"), "hggroup"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	479 hgkids = get (kids(k), "children");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	480 for j = 1 : length (hgkids)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	481 hgobj = get (hgkids(j));
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	482 if (isfield (hgobj, "displayname")
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	483 && ! isempty (hgobj.displayname))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	484 hplots = [hplots, hgkids(j)];
13936 bfaacd5e7379 Bug fix (#34901). Allow legend options to be specified. Modify demo. Ben Abbott <bpabbott@mac.com> parents: 13279 diff changeset	485 text_strings = {text_strings{:}, hgobj.displayname};
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	486 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	487 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	488 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	489 else
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	490 if (! isempty (get (kids(k), "displayname")))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	491 hplots = [hplots, kids(k)];
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	492 text_strings = {text_strings{:}, get(kids(k), "displayname")};
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	493 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	494 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	495 if (--k == 0)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	496 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	497 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	498 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	499 endwhile
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	500 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	501
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	502 if (isempty (hplots))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	503 if (! isempty (hlegend))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	504 fkids = get (fig, "children");
16800 56102c33122d Fix problems with changeset 286904321282. Ben Abbott <bpabbott@mac.com> parents: 16799 diff changeset	505 delete (fkids(fkids == hlegend));
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	506 hlegend = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	507 hobjects = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	508 hplots = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	509 text_strings = {};
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	510 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	511 else
14578 f579a94aacaa Preserve legend handle when changing properties (Bug # 36259). Carnë Draug <carandraug+dev@gmail.com> parents: 14552 diff changeset	512 ## Preserve the old legend if it exists
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	513 if (! isempty (hlegend))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	514 if (strcmp (textpos, "default"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	515 textpos = get (hlegend, "textposition");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	516 endif
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	517 if (strcmp (location, "default"))
519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	518 location = get (hlegend, "location");
519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	519 inout = strfind (location, "outside");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	520 if (! isempty (inout))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	521 outside = true;
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	522 location = location(1:inout-1);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	523 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	524 outside = false;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	525 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	526 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	527 if (strcmp (orientation, "default"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	528 orientation = get (hlegend, "orientation");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	529 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	530 box = get (hlegend, "box");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	531 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	532 if (strcmp (textpos, "default"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	533 textpos = "left";
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	534 endif
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	535 if (strcmp (location, "default"))
519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	536 location = "northeast";
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	537 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	538 if (strcmp (orientation, "default"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	539 orientation = "vertical";
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	540 endif
14529 aabdc8f281f1 legend.m: Change default to boxon for Matlab compatibility (bug #36105). Rik <octave@nomad.inbox5.com> parents: 14375 diff changeset	541 box = "on";
6272 a1f3d3b7ee5c [project @ 2007-02-06 02:09:48 by jwe] jwe parents: 6257 diff changeset	542 endif
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	543
c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	544 ## Get axis size and fontsize in points.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	545 ## Rely on listener to handle coversion.
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	546 units = get (ca(1), "units");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	547 fontunits = get (ca(1), "fontunits");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	548 unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	549 set (ca(1), "units", "points");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	550 set (ca(1), "fontunits", "points");
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	551 if (isempty (hlegend) \|\| ! isprop (hlegend, "unmodified_axes_position"))
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	552 unmodified_axes_position = get (ca(1), "position");
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	553 unmodified_axes_outerposition = get (ca(1), "outerposition");
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	554 else
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	555 unmodified_axes_position = get (hlegend, "unmodified_axes_position");
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	556 unmodified_axes_outerposition = get (hlegend, ...
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	557 "unmodified_axes_outerposition");
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	558 endif
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	559 ca_pos = unmodified_axes_position;
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	560 ca_outpos = unmodified_axes_outerposition;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	561 ca_fontsize = get (ca(1), "fontsize");
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	562 tightinset = get (ca(1), "tightinset");
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	563 for i = 2 : numel (ca)
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	564 tightinset = max (tightinset, get (ca(i), "tightinset"));
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	565 endfor
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	566 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	567 set (ca(1), "units", units);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	568 set (ca(1), "fontunits", fontunits);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	569 end_unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	570
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	571 ## Padding between legend entries horizontally and vertically
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	572 xpad = 2;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	573 ypad = 2;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	574
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	575 linelength = 15;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	576
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	577 ## Create the axis first
17179 828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	578 ## FIXME: hlegend should inherit properties from "ca"
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	579 curaxes = get (fig, "currentaxes");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	580 unwind_protect
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14846 diff changeset	581 ud = ancestor (hplots, "axes");
5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14846 diff changeset	582 if (!isscalar (ud))
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	583 ud = unique ([ud{:}]);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	584 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	585 if (isempty (hlegend))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	586 addprops = true;
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	587 hlegend = axes ("tag", "legend", "userdata", struct ("handle", ud),
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	588 "box", box,
14529 aabdc8f281f1 legend.m: Change default to boxon for Matlab compatibility (bug #36105). Rik <octave@nomad.inbox5.com> parents: 14375 diff changeset	589 "xtick", [], "ytick", [],
aabdc8f281f1 legend.m: Change default to boxon for Matlab compatibility (bug #36105). Rik <octave@nomad.inbox5.com> parents: 14375 diff changeset	590 "xticklabel", "", "yticklabel", "", "zticklabel", "",
14578 f579a94aacaa Preserve legend handle when changing properties (Bug # 36259). Carnë Draug <carandraug+dev@gmail.com> parents: 14552 diff changeset	591 "xlim", [0, 1], "ylim", [0, 1],
f579a94aacaa Preserve legend handle when changing properties (Bug # 36259). Carnë Draug <carandraug+dev@gmail.com> parents: 14552 diff changeset	592 "visible", ifelse (strcmp (box, "on"), "on", "off"),
14746 3ddb62bd67c5 legend.m: Inherit font size from axes. Konstantinos Poulios <logari81@gmail.com> parents: 14589 diff changeset	593 "activepositionproperty", "position",
3ddb62bd67c5 legend.m: Inherit font size from axes. Konstantinos Poulios <logari81@gmail.com> parents: 14589 diff changeset	594 "fontsize", ca_fontsize);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	595 else
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	596 addprops = false;
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	597 axes (hlegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	598 delete (get (hlegend, "children"));
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	599 endif
16728 5cf7369a74cb Update legend box when the fontsize changes. Ben Abbott <bpabbott@mac.com> parents: 16094 diff changeset	600 fontsize = get (hlegend, "fontsize");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	601 ## Add text label to the axis first, checking their extents
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	602 nentries = numel (hplots);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	603 texthandle = [];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	604 maxwidth = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	605 maxheight = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	606 for k = 1 : nentries
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	607 if (strcmp (textpos, "right"))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	608 texthandle = [texthandle, text(0, 0, text_strings{k},
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	609 "horizontalalignment", "left",
14746 3ddb62bd67c5 legend.m: Inherit font size from axes. Konstantinos Poulios <logari81@gmail.com> parents: 14589 diff changeset	610 "userdata", hplots(k),
16728 5cf7369a74cb Update legend box when the fontsize changes. Ben Abbott <bpabbott@mac.com> parents: 16094 diff changeset	611 "fontsize", fontsize)];
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	612 else
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	613 texthandle = [texthandle, text(0, 0, text_strings{k},
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	614 "horizontalalignment", "right",
14746 3ddb62bd67c5 legend.m: Inherit font size from axes. Konstantinos Poulios <logari81@gmail.com> parents: 14589 diff changeset	615 "userdata", hplots(k),
16728 5cf7369a74cb Update legend box when the fontsize changes. Ben Abbott <bpabbott@mac.com> parents: 16094 diff changeset	616 "fontsize", fontsize)];
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	617 endif
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	618 units = get (texthandle(end), "units");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	619 unwind_protect
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	620 set (texthandle(end), "units", "points");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	621 extents = get (texthandle(end), "extent");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	622 maxwidth = max (maxwidth, extents(3));
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	623 maxheight = max (maxheight, extents(4));
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	624 unwind_protect_cleanup
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	625 set (texthandle(end), "units", units);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	626 end_unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	627 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	628
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	629 num1 = nentries;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	630 if (strcmp (orientation, "vertical"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	631 height = nentries * (ypad + maxheight);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	632 if (outside)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	633 if (height > ca_pos(4))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	634 ## Avoid shrinking the height of the axis to zero if outside
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	635 num1 = ca_pos(4) / (maxheight + ypad) / 2;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	636 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	637 else
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	638 if (height > 0.9 * ca_pos(4))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	639 num1 = 0.9 * ca_pos(4) / (maxheight + ypad);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	640 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	641 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	642 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	643 width = nentries * (ypad + maxwidth);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	644 if (outside)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	645 if (width > ca_pos(3))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	646 ## Avoid shrinking the width of the axis to zero if outside
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	647 num1 = ca_pos(3) / (maxwidth + ypad) / 2;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	648 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	649 else
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	650 if (width > 0.9 * ca_pos(3))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	651 num1 = 0.9 * ca_pos(3) / (maxwidth + ypad);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	652 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	653 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	654 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	655 num2 = ceil (nentries / num1);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	656
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	657 xstep = 3 * xpad + (maxwidth + linelength);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	658 if (strcmp (textpos, "right"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	659 xoffset = xpad;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	660 txoffset = 2 * xpad + linelength;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	661 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	662 xoffset = 2 * xpad + maxwidth;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	663 txoffset = xpad + maxwidth;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	664 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	665 ystep = (ypad + maxheight);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	666 yoffset = ystep / 2;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	667
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	668 ## Place the legend in the desired location
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	669 if (strcmp (orientation, "vertical"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	670 lpos = [0, 0, num2 * xstep, num1 * ystep];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	671 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	672 lpos = [0, 0, num1 * xstep, num2 * ystep];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	673 endif
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	674
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	675 gnuplot = strcmp (get (fig, "__graphics_toolkit__"), "gnuplot");
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	676 if (gnuplot)
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	677 ## Gnuplot places the key (legend) at edge of the figure window.
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	678 ## OpenGL places the legend box at edge of the unmodified axes
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	679 ## position.
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	680 if (isempty (strfind (location, "east")))
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	681 gnuplot_offset = unmodified_axes_outerposition(1) ...
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	682 + unmodified_axes_outerposition(3) ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	683 - unmodified_axes_position(1) ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	684 - unmodified_axes_position(3);
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	685 else
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	686 gnuplot_offset = unmodified_axes_position(1) ...
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	687 - unmodified_axes_outerposition(1);
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	688 endif
17179 828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	689 ## FIXME: The "fontsize" is added to match the behavior of OpenGL.
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	690 ## This implies that a change in fontsize should trigger a listener
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	691 ## to update the legend. The "2" was determined using a long legend
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	692 ## key in the absence of any subplots.
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	693 gnuplot_offset = gnuplot_offset - 2 * fontsize;
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	694 else
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	695 gnuplot_offset = 0;
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	696 endif
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	697
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	698 ## For legend's outside the associated axes postion, align their edge
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	699 ## to the unmodified_axes_outerpostion, and adjust the axes postion
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	700 ## accordingly.
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	701 switch (location)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	702 case "north"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	703 if (outside)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	704 lpos = [ca_pos(1) + (ca_pos(3) - lpos(3)) / 2, ...
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	705 ca_outpos(2) + ca_outpos(4) - lpos(4) - ypad, lpos(3), ...
6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	706 lpos(4)];
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	707
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	708 new_pos = [ca_pos(1), ca_pos(2), ca_pos(3), ca_pos(4) - lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	709 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	710 lpos = [ca_pos(1) + (ca_pos(3) - lpos(3)) / 2, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	711 ca_pos(2) + ca_pos(4) - lpos(4) - ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	712 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	713 case "south"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	714 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	715 lpos = [ca_pos(1) + (ca_pos(3) - lpos(3)) / 2, ...
6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	716 ca_outpos(2) + ypad, lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	717 new_pos = [ca_pos(1), lpos(2) + lpos(4) + 2 * ypad ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	718 + tightinset(2), ca_pos(3), ...
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	719 ca_pos(4) - lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	720 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	721 lpos = [ca_pos(1) + (ca_pos(3) - lpos(3)) / 2, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	722 ca_pos(2) + ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	723 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	724 case "east"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	725 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	726 lpos = [ca_outpos(1) + ca_outpos(3) - lpos(3) - ypad, ...
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	727 ca_pos(2) + (ca_pos(4) - lpos(4)) / 2, lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	728 new_pos = [ca_pos(1), ca_pos(2), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	729 lpos(1) - 2 * xpad - ca_pos(1) - tightinset(3), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	730 ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	731 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	732 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	733 lpos = [ca_pos(1) + ca_pos(3) - lpos(3) - ypad, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	734 ca_pos(2) + (ca_pos(4) - lpos(4)) / 2, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	735 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	736 case "west"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	737 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	738 lpos = [ca_outpos(1) + ypad, ...
6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	739 ca_pos(2) + (ca_pos(4) - lpos(4)) / 2, ...
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	740 lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	741 new_pos = [lpos(1) + lpos(3) + 2 * xpad + tightinset(1), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	742 ca_pos(2), ca_pos(3) - lpos(3) - 2 * xpad, ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	743 new_pos(1) = new_pos(1) - gnuplot_offset;
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	744 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	745 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	746 lpos = [ca_pos(1) + ypad, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	747 ca_pos(2) + (ca_pos(4) - lpos(4)) / 2, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	748 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	749 case "northeast"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	750 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	751 lpos = [ca_outpos(1) + ca_outpos(3) - lpos(3) - ypad, ...
12395 4d30b4136a3e legend.m: Align legends to plot box, add demo. Bug 32373. Ben Abbott <bpabbott@mac.com> parents: 12394 diff changeset	752 ca_pos(2) + ca_pos(4) - lpos(4), lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	753 new_pos = [ca_pos(1), ca_pos(2), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	754 lpos(1) - 2 * xpad - tightinset(3) - ca_pos(1), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	755 ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	756 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	757 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	758 lpos = [ca_pos(1) + ca_pos(3) - lpos(3) - ypad, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	759 ca_pos(2) + ca_pos(4) - lpos(4) - ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	760 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	761 case "northwest"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	762 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	763 lpos = [ca_outpos(1) + ypad , ca_pos(2) + ca_pos(4) - lpos(4), ...
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	764 lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	765 new_pos = [lpos(1) + lpos(3) + 2 * xpad + tightinset(1), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	766 ca_pos(2), ca_pos(3) - lpos(3) - 2 * xpad, ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	767 new_pos(1) = new_pos(1) - gnuplot_offset;
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	768 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	769 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	770 lpos = [ca_pos(1) + ypad, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	771 ca_pos(2) + ca_pos(4) - lpos(4) - ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	772 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	773 case "southeast"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	774 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	775 lpos = [ca_outpos(1) + ca_outpos(3) - lpos(3) - ypad, ...
6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	776 ca_pos(2), lpos(3), lpos(4)];
12395 4d30b4136a3e legend.m: Align legends to plot box, add demo. Bug 32373. Ben Abbott <bpabbott@mac.com> parents: 12394 diff changeset	777 new_pos = [ca_pos(1), ca_pos(2), ...
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	778 lpos(1) - 2 * xpad - ca_pos(1) - tightinset(3), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	779 ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	780 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	781 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	782 lpos = [ca_pos(1) + ca_pos(3) - lpos(3) - ypad, ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	783 ca_pos(2) + ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	784 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	785 case "southwest"
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	786 if (outside)
12396 6ba430a75553 Fix for legends with location southeastoutside and soutwestoutside. Pad legend position David Bateman <dbateman@free.fr> parents: 12395 diff changeset	787 lpos = [ca_outpos(1) + ypad, ca_pos(2), lpos(3), lpos(4)];
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	788 new_pos = [lpos(1) + lpos(3) + 2 * xpad + tightinset(1), ...
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	789 ca_pos(2), ca_pos(3) - lpos(3) - 2 * xpad, ca_pos(4)];
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	790 new_pos(1) = new_pos(1) - gnuplot_offset;
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	791 new_pos(3) = new_pos(3) + gnuplot_offset;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	792 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	793 lpos = [ca_pos(1) + ypad, ca_pos(2) + ypad, lpos(3), lpos(4)];
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	794 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	795 endswitch
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	796
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	797 units = get (hlegend, "units");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	798 unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	799 set (hlegend, "units", "points");
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	800 set (hlegend, "position", lpos);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	801 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	802 set (hlegend, "units", units);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	803 end_unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	804
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	805 ## Now write the line segments and place the text objects correctly
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	806 xk = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	807 yk = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	808 for k = 1 : numel (hplots)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	809 hobjects = [hobjects, texthandle(k)];
11120 a44f979a35ce style fixes for some .m files John W. Eaton <jwe@octave.org> parents: 11033 diff changeset	810 switch (get (hplots(k), "type"))
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	811 case "line"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	812 color = get (hplots(k), "color");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	813 style = get (hplots(k), "linestyle");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	814 if (! strcmp (style, "none"))
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	815 l1 = line ("xdata", ([xoffset, xoffset + linelength] + xk * xstep) / lpos(3),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	816 "ydata", [1, 1] .* (lpos(4) - yoffset - yk * ystep) / lpos(4),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	817 "color", color, "linestyle", style, "marker", "none",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	818 "userdata", hplots (k));
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	819 hobjects = [hobjects, l1];
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	820 endif
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	821 marker = get (hplots(k), "marker");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	822 if (! strcmp (marker, "none"))
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	823 l1 = line ("xdata", (xoffset + 0.5 * linelength + xk * xstep) / lpos(3),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	824 "ydata", (lpos(4) - yoffset - yk * ystep) / lpos(4),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	825 "color", color, "linestyle", "none", "marker", marker,
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	826 "markeredgecolor", get (hplots (k), "markeredgecolor"),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	827 "markerfacecolor", get (hplots (k), "markerfacecolor"),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	828 "markersize", get (hplots (k), "markersize"),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	829 "userdata", hplots (k));
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	830 hobjects = [hobjects, l1];
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	831 endif
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	832
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	833 addlistener (hplots(k), "color",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	834 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	835 addlistener (hplots(k), "linestyle",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	836 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	837 addlistener (hplots(k), "marker",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	838 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	839 addlistener (hplots(k), "markeredgecolor",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	840 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	841 addlistener (hplots(k), "markerfacecolor",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	842 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	843 addlistener (hplots(k), "markersize",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	844 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	845 addlistener (hplots(k), "displayname",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	846 {@updateline, hlegend, linelength});
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	847 case "patch"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	848 facecolor = get (hplots(k), "facecolor");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	849 edgecolor = get (hplots(k), "edgecolor");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	850 cdata = get (hplots(k), "cdata");
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	851 if (! strcmp (facecolor, "none") \|\| ! strcmp (edgecolor, "none"))
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	852 p1 = patch ("xdata", ([0, linelength, linelength, 0] +
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	853 xoffset + xk * xstep) / lpos(3),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	854 "ydata", (lpos(4) - yoffset -
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	855 [yk-0.3, yk-0.3, yk+0.3, yk+0.3] .* ystep) / lpos(4),
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	856 "facecolor", facecolor, "edgecolor", edgecolor,
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	857 "cdata", cdata, "userdata", hplots(k));
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	858 hobjects = [hobjects, p1];
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	859 endif
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	860 case "surface"
10999 9f45b76c16e3 legend.m: Treat line, patch, and surface objects differetly. Ben Abbott <bpabbott@mac.com> parents: 10995 diff changeset	861 endswitch
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	862 set (texthandle (k), "position", [(txoffset + xk * xstep) / lpos(3), ...
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	863 (lpos(4) - yoffset - yk * ystep) / lpos(4)]);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	864 if (strcmp (orientation, "vertical"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	865 yk++;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	866 if (yk > num1)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	867 yk = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	868 xk++;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	869 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	870 else
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	871 xk++;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	872 if (xk > num1)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	873 xk = 0;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	874 yk++;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	875 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	876 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	877 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	878
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	879 ## Add an invisible text object to original axis
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	880 ## that when it is destroyed will remove the legend
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	881 props = {"parent", ca(1), "tag", "legend", ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	882 "handlevisibility", "off", "visible", "off", ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	883 "xliminclude", "off", "yliminclude", "off"};
16800 56102c33122d Fix problems with changeset 286904321282. Ben Abbott <bpabbott@mac.com> parents: 16799 diff changeset	884 t1 = findall (ca(1), props{3:4}, "type", "text");
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	885 if (isempty (t1))
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	886 t1 = text (0, 0, "", props{:});
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	887 set (t1, "deletefcn", {@deletelegend1, hlegend});
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	888 endif
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	889 if (isprop (hlegend, "unmodified_axes_position"))
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	890 set (hlegend, "unmodified_axes_position", unmodified_axes_position);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	891 set (hlegend, "unmodified_axes_outerposition",
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	892 unmodified_axes_outerposition);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	893 else
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	894 addproperty ("unmodified_axes_position", hlegend,
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	895 "data", unmodified_axes_position);
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	896 addproperty ("unmodified_axes_outerposition", hlegend,
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	897 "data", unmodified_axes_outerposition);
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	898 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	899
15441 e5a07d7aafcc legend.m: Remove unused warning variable and associated code. Rik <rik@octave.org> parents: 15440 diff changeset	900 ## Resize the axis that the legend is attached to if the
e5a07d7aafcc legend.m: Remove unused warning variable and associated code. Rik <rik@octave.org> parents: 15440 diff changeset	901 ## legend is "outside" the plot and create a listener to
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	902 ## resize axis to original size if the legend is deleted,
15441 e5a07d7aafcc legend.m: Remove unused warning variable and associated code. Rik <rik@octave.org> parents: 15440 diff changeset	903 ## hidden, or shown.
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	904 if (outside)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	905 for i = 1 : numel (ca)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	906 units = get (ca(i), "units");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	907 unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	908 set (ca(i), "units", "points");
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	909 if (gnuplot && numel (ca) == 1)
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	910 ## Let Gnuplot handle the positioning of the keybox.
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	911 ## This violates strict Matlab compatibility, but reliably
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	912 ## renders an esthetic result.
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	913 set (ca(i), "position", unmodified_axes_position);
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	914 set (ca(i), "activepositionproperty", "outerposition")
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	915 else
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	916 ## numel (ca) > 1 for axes overlays (like plotyy)
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	917 set (ca(i), "position", new_pos);
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	918 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	919 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	920 set (ca(i), "units", units);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	921 end_unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	922 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	923
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	924 set (hlegend, "deletefcn", {@deletelegend2, ca, ...
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	925 unmodified_axes_position, ...
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	926 unmodified_axes_outerposition, ...
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	927 t1, hplots});
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	928 addlistener (hlegend, "visible", {@hideshowlegend, ca, ...
16909 8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	929 unmodified_axes_position, ...
8f9ed9d8a478 Allow gnuplot to handle keybox and axes positioning. Ben Abbott <bpabbott@mac.com> parents: 16908 diff changeset	930 new_pos});
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	931 else
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	932 set (hlegend, "deletefcn", {@deletelegend2, ca, [], [], t1, hplots});
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	933 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	934
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	935 if (addprops)
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	936 addproperty ("edgecolor", hlegend, "color", [0, 0, 0]);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	937 addproperty ("textcolor", hlegend, "color", [0, 0, 0]);
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	938 locations = {"north", "south", "east", "west", ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	939 "northeast", "southeast", "northwest", "southwest", ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	940 "northoutside", "southoutside", ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	941 "eastoutside", "westoutside", ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	942 "northeastoutside", "southeastoutside", ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	943 "northwestoutside", "southwestoutside"};
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	944 addproperty ("location", hlegend, "radio", strjoin (locations, "\|"));
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	945 addproperty ("orientation", hlegend, "radio",
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	946 "{vertical}\|horizontal");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	947 addproperty ("string", hlegend, "any", text_strings);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	948 addproperty ("textposition", hlegend, "radio", "{left}\|right");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	949 else
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	950 set (hlegend, "string", text_strings);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	951 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	952
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	953 if (outside)
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	954 set (hlegend, "location", strcat (location, "outside"),
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	955 "orientation", orientation, "textposition", textpos);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	956 else
16796 519343308ab1 Rename "position" variable to "location" in legend.m Ben Abbott <bpabbott@mac.com> parents: 16795 diff changeset	957 set (hlegend, "location", location, "orientation", orientation,
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	958 "textposition", textpos);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	959 endif
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	960 if (addprops)
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	961 addlistener (hlegend, "edgecolor", @updatelegendtext);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	962 addlistener (hlegend, "textcolor", @updatelegendtext);
16885 fb80e1891cf9 Change to legend fontsize should trigger updatelegendtext. Ben Abbott <bpabbott@mac.com> parents: 16826 diff changeset	963 addlistener (hlegend, "fontsize", @updatelegendtext);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	964 addlistener (hlegend, "interpreter", @updatelegendtext);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	965 addlistener (hlegend, "location", @updatelegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	966 addlistener (hlegend, "orientation", @updatelegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	967 addlistener (hlegend, "string", @updatelegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	968 addlistener (hlegend, "textposition", @updatelegend);
17179 828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	969 ## FIXME: need to add listeners for tighinset and position
16910 8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	970 ## addlistener (ca, "tightinset", @update????);
8a4e53cf79c9 Modify the plotbox position relative to the keybox position. Ben Abbott <bpabbott@mac.com> parents: 16909 diff changeset	971 ## addlistener (ca, "position", @update????);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	972 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	973 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	974 set (fig, "currentaxes", curaxes);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	975 end_unwind_protect
6272 a1f3d3b7ee5c [project @ 2007-02-06 02:09:48 by jwe] jwe parents: 6257 diff changeset	976 endif
6147 e14b0e9b7bf7 [project @ 2006-11-09 03:28:01 by jwe] jwe parents: 6146 diff changeset	977 endif
e14b0e9b7bf7 [project @ 2006-11-09 03:28:01 by jwe] jwe parents: 6146 diff changeset	978
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	979 if (nargout > 0)
11134 7c045d801702 legend.m: Trivial fix to allow legend handle to be returned. Ben Abbott <bpabbott@mac.com> parents: 11120 diff changeset	980 hlegend2 = hlegend;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	981 hobjects2 = hobjects;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	982 hplot2 = hplots;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	983 text_strings2 = text_strings;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	984 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	985
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	986 endfunction
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	987
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	988 function updatelegend (h, d)
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	989 persistent recursive = false;
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	990
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	991 if (! recursive)
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	992 recursive = true;
12339 eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	993 unwind_protect
eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	994 hax = getfield (get (h, "userdata"), "handle");
eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	995 [hplots, text_strings] = __getlegenddata__ (h);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	996 position = get (h, "unmodified_axes_position");
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	997 outerposition = get (h, "unmodified_axes_outerposition");
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	998 units = get (hax, "units");
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	999 set (hax, "units", "points");
16933 e39f00a32dc7 maint: Use parentheses around condition for switch(),while(),if() statements. Rik <rik@octave.org> parents: 16921 diff changeset	1000 switch (get (hax, "activepositionproperty"))
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1001 case "position"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1002 set (hax, "outerposition", outerposition);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1003 set (hax, "position", position);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1004 case "outerposition"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1005 set (hax, "position", position);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17125 diff changeset	1006 set (hax, "outerposition", outerposition);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1007 endswitch
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1008 set (hax, "units", units);
12339 eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1009 h = legend (hax, hplots, get (h, "string"));
eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1010 unwind_protect_cleanup
eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1011 recursive = false;
eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1012 end_unwind_protect
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1013 endif
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1014
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1015 endfunction
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1016
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1017 function updatelegendtext (h, d)
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1018 hax = get (h, "userdata").handle;
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1019 kids = get (h, "children");
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1020 text_kids = findobj (kids, "-property", "interpreter", "type", "text");
f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1021 interpreter = get (h, "interpreter");
f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1022 textcolor = get (h, "textcolor");
16002 cddf9103a566 Fix legend bugs (#38263, #38265). Ben Abbott <bpabbott@mac.com> parents: 15570 diff changeset	1023 fontsize = get (h, "fontsize");
cddf9103a566 Fix legend bugs (#38263, #38265). Ben Abbott <bpabbott@mac.com> parents: 15570 diff changeset	1024 set (text_kids, "interpreter", interpreter,
cddf9103a566 Fix legend bugs (#38263, #38265). Ben Abbott <bpabbott@mac.com> parents: 15570 diff changeset	1025 "fontsize", fontsize,
cddf9103a566 Fix legend bugs (#38263, #38265). Ben Abbott <bpabbott@mac.com> parents: 15570 diff changeset	1026 "color", textcolor);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1027 endfunction
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1028
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	1029 function hideshowlegend (h, d, ca, pos1, pos2)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1030 isvisible = strcmp (get (h, "visible"), "off");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1031 if (! isvisible)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1032 kids = get (h, "children");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1033 for i = 1 : numel (kids)
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1034 if (! strcmp (get (kids(i), "visible"), "off"))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1035 isvisible = true;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1036 break;
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1037 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1038 endfor
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1039 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1040
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1041 for i = 1 : numel (ca)
17125 b5d6314314fc Change various plot functions to take advantage of new isaxes() function. Rik <rik@octave.org> parents: 17122 diff changeset	1042 if (isaxes (ca(i))
14846 460a3c6d8bf1 maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists. Rik <octave@nomad.inbox5.com> parents: 14755 diff changeset	1043 && (isempty (gcbf ()) \|\| strcmp (get (gcbf (), "beingdeleted"),"off"))
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11134 diff changeset	1044 && strcmp (get (ca(i), "beingdeleted"), "off"))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1045 units = get (ca(i), "units");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1046 unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1047 set (ca(i), "units", "points");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1048 if (isvisible)
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	1049 set (ca(i), "position", pos2);
10990 529b36293297 Backed out changeset 6ea65c5de87a David Bateman <dbateman@free.fr> parents: 10989 diff changeset	1050 else
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	1051 set (ca(i), "position", pos1);
10990 529b36293297 Backed out changeset 6ea65c5de87a David Bateman <dbateman@free.fr> parents: 10989 diff changeset	1052 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1053 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1054 set (ca(i), "units", units);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1055 end_unwind_protect
10990 529b36293297 Backed out changeset 6ea65c5de87a David Bateman <dbateman@free.fr> parents: 10989 diff changeset	1056 endif
529b36293297 Backed out changeset 6ea65c5de87a David Bateman <dbateman@free.fr> parents: 10989 diff changeset	1057 endfor
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1058 endfunction
10989 6ea65c5de87a Respect the units and paperunits figure properties and the units and fontunits axes properties David Bateman <dbateman@free.fr> parents: 10949 diff changeset	1059
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1060 function deletelegend1 (h, d, ca)
17125 b5d6314314fc Change various plot functions to take advantage of new isaxes() function. Rik <rik@octave.org> parents: 17122 diff changeset	1061 if (isaxes (ca)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1062 && (isempty (gcbf ()) \|\| strcmp (get (gcbf (), "beingdeleted"), "off"))
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11134 diff changeset	1063 && strcmp (get (ca, "beingdeleted"), "off"))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1064 delete (ca);
10989 6ea65c5de87a Respect the units and paperunits figure properties and the units and fontunits axes properties David Bateman <dbateman@free.fr> parents: 10949 diff changeset	1065 endif
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1066 endfunction
10989 6ea65c5de87a Respect the units and paperunits figure properties and the units and fontunits axes properties David Bateman <dbateman@free.fr> parents: 10949 diff changeset	1067
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1068 function deletelegend2 (h, d, ca, pos, outpos, t1, hplots)
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1069 for i = 1 : numel (ca)
17125 b5d6314314fc Change various plot functions to take advantage of new isaxes() function. Rik <rik@octave.org> parents: 17122 diff changeset	1070 if (isaxes (ca(i))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1071 && (isempty (gcbf ()) \|\| strcmp (get (gcbf (), "beingdeleted"), "off"))
11149 fe3c3dfc07eb style fix: break lines before && and \|\|, not after John W. Eaton <jwe@octave.org> parents: 11134 diff changeset	1072 && strcmp (get (ca(i), "beingdeleted"), "off"))
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1073 if (!isempty (pos) && !isempty(outpos))
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1074 units = get (ca(i), "units");
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1075 unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1076 set (ca(i), "units", "points");
12440 2ed62b9f949e synchronization of axes position and outerposition Konstantinos Poulios <logari81@googlemail.com> parents: 12437 diff changeset	1077 set (ca(i), "position", pos, "deletefcn", "");
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1078 unwind_protect_cleanup
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1079 set (ca(i), "units", units);
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1080 end_unwind_protect
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1081 endif
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1082 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1083 endfor
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1084 set (t1, "deletefcn", "");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1085 delete (t1);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1086 for i = 1 : numel (hplots)
15569 3649a6012eaa legend.m: Fix segmentation fault when deleting legend where plot has already been removed (Bug #37640) Rik <rik@octave.org> parents: 14138 diff changeset	1087 if (ishandle (hplots(i)) && strcmp (get (hplots (i), "type"), "line"))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1088 dellistener (hplots(i), "color");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1089 dellistener (hplots(i), "linestyle");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1090 dellistener (hplots(i), "marker");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1091 dellistener (hplots(i), "markeredgecolor");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1092 dellistener (hplots(i), "markerfacecolor");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1093 dellistener (hplots(i), "markersize");
1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1094 dellistener (hplots(i), "displayname");
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1095 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1096 endfor
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1097 endfunction
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1098
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1099 function updateline (h, d, hlegend, linelength)
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1100 lm = [];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1101 ll = [];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1102 kids = get (hlegend, "children");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1103 for i = 1 : numel (kids)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1104 if (get (kids(i), "userdata") == h
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1105 && strcmp (get (kids(i), "type"), "line"))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1106 if (strcmp (get (kids (i), "marker"), "none"))
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1107 ll = kids(i);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1108 else
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1109 lm = kids(i);
10995 e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1110 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1111 endif
e81914f3921f Update legend code to support fltk (fixes #29348 and partially fixes #30461) David Bateman <dbateman@free.fr> parents: 10990 diff changeset	1112 endfor
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1113
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1114 linestyle = get (h, "linestyle");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1115 marker = get (h, "marker");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1116 displayname = get (h, "displayname");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1117
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	1118 if ((isempty (displayname)
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1119 \|\| (strcmp (marker, "none") && strcmp (linestyle, "none")))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1120 && (! isempty (lm) \|\| isempty (ll)))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1121 ## An element was removed from the legend. Need to recall the
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1122 ## legend function to recreate a new legend
12339 eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1123 [hplots, text_strings] = __getlegenddata__ (hlegend);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1124 for i = 1 : numel (hplots)
15440 1db706430c96 Fix legend ('show') to work with DisplayName (bug #33757) Rik <rik@octave.org> parents: 15202 diff changeset	1125 if (hplots(i) == h)
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1126 hplots(i) = [];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1127 text_strings(i) = [];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1128 break;
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1129 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1130 endfor
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1131 legend (hplots, text_strings);
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	1132 elseif ((!isempty (displayname)
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1133 && (! strcmp (marker, "none") \|\| ! strcmp (linestyle, "none")))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1134 && isempty (lm) && isempty (ll))
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1135 ## An element was added to the legend. Need to re-call the
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1136 ## legend function to recreate a new legend.
12339 eda5eabd5d0b Fix for inline legends (#32022, #32343) David Bateman <dbateman@free.fr> parents: 11587 diff changeset	1137 [hplots, text_strings] = __getlegenddata__ (hlegend);
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1138 hplots = [hplots, h];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1139 text_strings = {text_strings{:}, displayname};
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1140 legend (hplots, text_strings);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1141 else
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1142 if (! isempty (ll))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1143 ypos1 = get (ll,"ydata");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1144 xpos1 = get (ll,"xdata");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1145 ypos2 = ypos1(1);
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14846 diff changeset	1146 xpos2 = sum (xpos1) / 2;
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1147 delete (ll);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1148 if (! isempty (lm))
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1149 delete (lm);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1150 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1151 else
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1152 ypos2 = get (lm,"ydata");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1153 xpos2 = get (lm,"xdata");
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1154 ypos1 = [ypos2, ypos2];
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1155 xpos1 = xpos2 + [-0.5, 0.5] * linelength;
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1156 delete (lm);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1157 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1158 if (! strcmp (linestyle, "none"))
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	1159 line ("xdata", xpos1, "ydata", ypos1, "color", get (h, "color"),
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1160 "linestyle", get (h, "linestyle"), "marker", "none",
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1161 "userdata", h, "parent", hlegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1162 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1163 if (! strcmp (marker, "none"))
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	1164 line ("xdata", xpos2, "ydata", ypos2, "color", get (h, "color"),
11198 9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1165 "marker", marker, "markeredgecolor", get (h, "markeredgecolor"),
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1166 "markerfacecolor", get (h, "markerfacecolor"),
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1167 "markersize", get (h, "markersize"), "linestyle", "none",
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1168 "userdata", h, "parent", hlegend);
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1169 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1170 endif
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1171 endfunction
9f080d23396f Fix multi-parented legends with the gnuplot backend (fixes #30461 and #31522) David Bateman <dbateman@free.fr> parents: 11149 diff changeset	1172
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1173
11418 a140991387fb legend.m: Add demo to legend for inline key. Ben Abbott <bpabbott@mac.com> parents: 11363 diff changeset	1174 %!demo
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1175 %! clf;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1176 %! plot (rand (2));
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1177 %! title ('legend called with cellstr and string inputs for labels');
16728 5cf7369a74cb Update legend box when the fontsize changes. Ben Abbott <bpabbott@mac.com> parents: 16094 diff changeset	1178 %! h = legend ({'foo'}, 'bar');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1179 %! legend location northeastoutside
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1180 %! set (h, 'fontsize', 20);
11462 aed2c50c3082 legend.m: legend with more than two inline keys (bug 31991). Add/modifyy demos. Ben Abbott <bpabbott@mac.com> parents: 11434 diff changeset	1181
aed2c50c3082 legend.m: legend with more than two inline keys (bug 31991). Add/modifyy demos. Ben Abbott <bpabbott@mac.com> parents: 11434 diff changeset	1182 %!demo
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1183 %! clf;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1184 %! plot (rand (3));
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1185 %! title ('legend() without inputs creates default labels');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1186 %! h = legend ();
14236 35903f035390 Escaping strings for legend entries are handled by __go_draw_axes__. Ben Abbott <bpabbott@mac.com> parents: 14214 diff changeset	1187
35903f035390 Escaping strings for legend entries are handled by __go_draw_axes__. Ben Abbott <bpabbott@mac.com> parents: 14214 diff changeset	1188 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1189 %! clf;
11418 a140991387fb legend.m: Add demo to legend for inline key. Ben Abbott <bpabbott@mac.com> parents: 11363 diff changeset	1190 %! x = 0:1;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1191 %! plot (x,x,';I am Blue;', x,2x, x,3x,';I am Red;');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1192 %! legend location northeastoutside
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1193 %! ## Placing legend inside should return axes to original size
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1194 %! legend location northeast
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1195 %! title ('Blue and Red keys, with Green missing');
8343 9f34f7636fe0 legend.m: Correct ording of legend labels. Ben Abbott <bpabbott@mac.com> parents: 8291 diff changeset	1196
9f34f7636fe0 legend.m: Correct ording of legend labels. Ben Abbott <bpabbott@mac.com> parents: 8291 diff changeset	1197 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1198 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1199 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1200 %! title ('incline is blue and decline is green');
4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1201 %! legend ({'I am blue', 'I am green'}, 'location', 'east');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1202 %! legend hide
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1203 %! legend show
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1204
a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1205 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1206 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1207 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1208 %! title ('Legend with keys in horizontal orientation');
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1209 %! legend ({'I am blue', 'I am green'}, ...
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1210 %! 'location', 'east', 'orientation', 'horizontal');
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1211 %! legend boxoff
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1212 %! legend boxon
11462 aed2c50c3082 legend.m: legend with more than two inline keys (bug 31991). Add/modifyy demos. Ben Abbott <bpabbott@mac.com> parents: 11434 diff changeset	1213
aed2c50c3082 legend.m: legend with more than two inline keys (bug 31991). Add/modifyy demos. Ben Abbott <bpabbott@mac.com> parents: 11434 diff changeset	1214 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1215 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1216 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
14529 aabdc8f281f1 legend.m: Change default to boxon for Matlab compatibility (bug #36105). Rik <octave@nomad.inbox5.com> parents: 14375 diff changeset	1217 %! title ('Legend with box off');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1218 %! legend ({'I am blue', 'I am green'}, 'location', 'east');
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1219 %! legend boxoff
11434 1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1220
1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1221 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1222 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1223 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1224 %! title ('Legend with text to the right of key');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1225 %! legend ({'I am blue', 'I am green'}, 'location', 'east');
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1226 %! legend right
8343 9f34f7636fe0 legend.m: Correct ording of legend labels. Ben Abbott <bpabbott@mac.com> parents: 8291 diff changeset	1227
9f34f7636fe0 legend.m: Correct ording of legend labels. Ben Abbott <bpabbott@mac.com> parents: 8291 diff changeset	1228 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1229 %! clf;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1230 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1231 %! title ({'Use properties to place legend text to the right of key', ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1232 %! 'Legend text color is magenta'});
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1233 %! h = legend ({'I am blue', 'I am green'}, 'location', 'east');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1234 %! legend ('left');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1235 %! set (h, 'textposition', 'right');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1236 %! set (h, 'textcolor', [1 0 1]);
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1237
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1238 %!demo
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1239 %! clf;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1240 %! plot (1:10, 1:10, 1:10, fliplr (1:10));
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1241 %! title ('Legend is hidden')
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1242 %! legend ({'I am blue', 'I am green'}, 'location', 'east');
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1243 %! legend hide
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1244
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1245 %!demo
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1246 %! clf;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1247 %! x = 0:1;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1248 %! plot (x,x,';I am Blue;', x,2x,';I am Green;', x,3x,';I am Red;');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1249 %! title ({'Labels are embedded in call to plot', ...
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1250 %! 'Legend is hidden and then shown'});
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1251 %! legend boxon
11434 1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1252 %! legend hide
1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1253 %! legend show
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1254
a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1255 %!demo
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1256 %! clf;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1257 %! x = 0:1;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1258 %! plot (x, x, ';\alpha;', ...
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1259 %! x, 2*x, ';\beta=2\alpha;', ...
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1260 %! x, 3*x, ';\gamma=3\alpha;');
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1261 %! title ('Labels with interpreted Greek text');
11434 1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1262
1f54ee6760b5 legend.m: Only one legend per axes (bug 32022) Ben Abbott <bpabbott@mac.com> parents: 11418 diff changeset	1263 %!demo
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1264 %! clf;
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1265 %! plot (rand (2));
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1266 %! title ('Labels with TeX interpreter turned off');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1267 %! h = legend ('Hello_World', 'foo^bar');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1268 %! set (h, 'interpreter', 'none');
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1269
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1270 %!demo
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1271 %! clf;
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1272 %! plot (1:10, 1:10);
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1273 %! title ('a very long label can sometimes cause problems');
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1274 %! legend ('hello very big world', 'location', 'northeastoutside');
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1275
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1276 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1277 %! clf;
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	1278 %! labels = {};
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1279 %! colororder = get (gca, 'colororder');
6146 1a6d826e92b5 [project @ 2006-11-09 03:13:11 by jwe] jwe parents: diff changeset	1280 %! for i = 1:5
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1281 %! h = plot (1:100, i + rand (100,1)); hold on;
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1282 %! set (h, 'color', colororder(i,:));
14252 4e6436a60b62 Changes to allow plot demos to be run under Matlab. Ben Abbott <bpabbott@mac.com> parents: 14245 diff changeset	1283 %! labels = {labels{:}, ['Signal ', num2str(i)]};
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1284 %! end
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1285 %! hold off;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1286 %! title ({'Signals with random offset and uniform noise';
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1287 %! 'Legend shown below and outside of plot'});
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1288 %! xlabel ('Sample Nr [k]'); ylabel ('Amplitude [V]');
4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1289 %! legend (labels, 'location', 'southoutside');
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1290
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1291 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1292 %! clf;
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1293 %! x = linspace (0, 10);
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1294 %! plot (x, x);
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1295 %! hold on;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1296 %! stem (x, x.^2, 'g');
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1297 %! title ('First created object gets first label');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1298 %! legend ('linear');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1299 %! hold off;
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1300
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1301 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1302 %! clf;
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1303 %! x = linspace (0, 10);
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1304 %! plot (x, x, x, x.^2);
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1305 %! title ('First created object gets first label');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1306 %! legend ('linear');
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1307
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1308 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1309 %! clf;
9451 350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1310 %! x = linspace (0, 10);
350148cc0774 legend.m: fix legend order John W. Eaton <jwe@octave.org> parents: 8920 diff changeset	1311 %! plot (x, x, x, x.^2);
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1312 %! title ('Labels are applied in order of object creation');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1313 %! legend ('linear', 'quadratic');
9457 f9fb8c1a8e45 legend.m: Add an hggroup demo using bar(). Include clf() in each demo. Ben Abbott <bpabbott@mac.com> parents: 9451 diff changeset	1314
f9fb8c1a8e45 legend.m: Add an hggroup demo using bar(). Include clf() in each demo. Ben Abbott <bpabbott@mac.com> parents: 9451 diff changeset	1315 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1316 %! clf;
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1317 %! rand_2x3_data1 = [0.341447, 0.171220, 0.284370; 0.039773, 0.731725, 0.779382];
a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1318 %! bar (rand_2x3_data1);
13936 bfaacd5e7379 Bug fix (#34901). Allow legend options to be specified. Modify demo. Ben Abbott <bpabbott@mac.com> parents: 13279 diff changeset	1319 %! ylim ([0 1.0]);
17190 df4c4b7708a4 Add titles and clean-up plotting %!demos. Rik <rik@octave.org> parents: 17179 diff changeset	1320 %! title ('legend() works for bar graphs (hggroups)');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1321 %! legend ({'1st Bar', '2nd Bar', '3rd Bar'});
9457 f9fb8c1a8e45 legend.m: Add an hggroup demo using bar(). Include clf() in each demo. Ben Abbott <bpabbott@mac.com> parents: 9451 diff changeset	1322
f9fb8c1a8e45 legend.m: Add an hggroup demo using bar(). Include clf() in each demo. Ben Abbott <bpabbott@mac.com> parents: 9451 diff changeset	1323 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1324 %! clf;
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1325 %! rand_2x3_data2 = [0.44804, 0.84368, 0.23012; 0.72311, 0.58335, 0.90531];
a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1326 %! bar (rand_2x3_data2);
a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1327 %! ylim ([0 1.2]);
17190 df4c4b7708a4 Add titles and clean-up plotting %!demos. Rik <rik@octave.org> parents: 17179 diff changeset	1328 %! title ('legend() works for bar graphs (hggroups)');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1329 %! legend ('1st Bar', '2nd Bar', '3rd Bar');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1330 %! legend right;
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	1331
3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	1332 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1333 %! clf;
10662 3afcd24ced61 legend.m: Key labels for specified objects. Ben Abbott <bpabbott@mac.com> parents: 10549 diff changeset	1334 %! x = 0:0.1:7;
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1335 %! h = plot (x,sin(x), x,cos(x), x,sin(x.^2/10), x,cos(x.^2/10));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1336 %! title ('Only the sin() objects have keylabels');
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1337 %! legend (h([1, 3]), {'sin (x)', 'sin (x^2/10)'}, 'location', 'southwest');
11363 a0dfd7e8e3e2 Assign data used in demo plots for reproducibility between runs Rik <octave@nomad.inbox5.com> parents: 11246 diff changeset	1338
12340 d63007ac067a legend.m: Add demo for inline keys created by two plot commands. Ben Abbott <bpabbott@mac.com> parents: 12339 diff changeset	1339 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1340 %! clf;
12340 d63007ac067a legend.m: Add demo for inline keys created by two plot commands. Ben Abbott <bpabbott@mac.com> parents: 12339 diff changeset	1341 %! x = 0:0.1:10;
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1342 %! plot (x, sin (x), ';sin (x);');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1343 %! hold all;
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1344 %! plot (x, cos (x), ';cos (x);');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1345 %! hold off;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1346 %! title ('legend constructed from multiple plot calls');
12340 d63007ac067a legend.m: Add demo for inline keys created by two plot commands. Ben Abbott <bpabbott@mac.com> parents: 12339 diff changeset	1347
12387 5fb6ea1bff65 legend.m: Add demo for replacing existing legend. Ben Abbott <bpabbott@mac.com> parents: 12340 diff changeset	1348 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1349 %! clf;
12387 5fb6ea1bff65 legend.m: Add demo for replacing existing legend. Ben Abbott <bpabbott@mac.com> parents: 12340 diff changeset	1350 %! x = 0:0.1:10;
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1351 %! plot (x, sin (x), ';sin (x);');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1352 %! hold all;
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1353 %! plot (x, cos (x), ';cos (x);');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1354 %! hold off;
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1355 %! title ('Specified label text overrides previous labels');
015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1356 %! legend ({'Sine', 'Cosine'}, 'location', 'northeastoutside');
12387 5fb6ea1bff65 legend.m: Add demo for replacing existing legend. Ben Abbott <bpabbott@mac.com> parents: 12340 diff changeset	1357
12394 c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	1358 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1359 %! clf;
12394 c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	1360 %! x = 0:10;
c2e1973d870b legend.m: "legend off" should delete the legend object. Ben Abbott <bpabbott@mac.com> parents: 12388 diff changeset	1361 %! plot (x, rand (11));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1362 %! xlabel ('Indices');
4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1363 %! ylabel ('Random Values');
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1364 %! title ('Legend ''off'' deletes the legend');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1365 %! legend (cellstr (num2str ((1:10)')), 'location', 'northeastoutside');
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1366 %! legend off;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1367 %! axis ([0, 10, 0 1]);
12387 5fb6ea1bff65 legend.m: Add demo for replacing existing legend. Ben Abbott <bpabbott@mac.com> parents: 12340 diff changeset	1368
12395 4d30b4136a3e legend.m: Align legends to plot box, add demo. Bug 32373. Ben Abbott <bpabbott@mac.com> parents: 12394 diff changeset	1369 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1370 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1371 %! x = (1:5)';
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1372 %! subplot (2,2,1);
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1373 %! plot (x, rand (numel (x)));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1374 %! legend (cellstr (num2str (x)), 'location', 'northwestoutside');
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1375 %! subplot (2,2,2);
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1376 %! plot (x, rand (numel (x)));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1377 %! legend (cellstr (num2str (x)), 'location', 'northeastoutside');
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1378 %! subplot (2,2,3);
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1379 %! plot (x, rand (numel (x)));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1380 %! legend (cellstr (num2str (x)), 'location', 'southwestoutside');
14363 f3d52523cde1 Use Octave coding conventions in all m-file %!test blocks Rik <octave@nomad.inbox5.com> parents: 14252 diff changeset	1381 %! subplot (2,2,4);
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1382 %! plot (x, rand (numel (x)));
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1383 %! legend (cellstr (num2str (x)), 'location', 'southeastoutside');
12387 5fb6ea1bff65 legend.m: Add demo for replacing existing legend. Ben Abbott <bpabbott@mac.com> parents: 12340 diff changeset	1384
12395 4d30b4136a3e legend.m: Align legends to plot box, add demo. Bug 32373. Ben Abbott <bpabbott@mac.com> parents: 12394 diff changeset	1385 %!demo
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1386 %! clf;
11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14236 diff changeset	1387 %! plot (rand (2));
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1388 %! title ('legend() will warn if extra labels are specified');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1389 %! legend ('Hello', 'World', 'interpreter', 'foobar');
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1390
f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1391 %!demo
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1392 %! clf;
14207 57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1393 %! x = 0:10;
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1394 %! y1 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1395 %! y2 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1396 %! [ax, h1, h2] = plotyy (x, y1, x, y2);
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1397 %! title ('plotyy legend test #1: Blue and Green labels');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1398 %! legend ([h1, h2], {'Blue', 'Green'}, 'location', 'south');
12395 4d30b4136a3e legend.m: Align legends to plot box, add demo. Bug 32373. Ben Abbott <bpabbott@mac.com> parents: 12394 diff changeset	1399
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1400 %!demo
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1401 %! clf;
14207 57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1402 %! x = 0:10;
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1403 %! y1 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1404 %! y2 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1405 %! [ax, h1, h2] = plotyy (x, y1, x, y2);
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1406 %! title ('plotyy legend test #2: Blue and Green labels');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1407 %! legend ({'Blue', 'Green'}, 'location', 'south');
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1408
f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1409 %!demo
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1410 %! clf;
14207 57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1411 %! x = 0:10;
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1412 %! y1 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1413 %! y2 = rand (size (x));
57e3490094e1 Fix order of legend entries for plotyy. Bug # 35314. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	1414 %! [ax, h1, h2] = plotyy (x, y1, x, y2);
15442 015cc3d1f389 legend.m: Overhaul function and add support for automatic data labels. Rik <rik@octave.org> parents: 15441 diff changeset	1415 %! title ('plotyy legend test #3: Blue and Green labels');
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	1416 %! legend ('Blue', 'Green', 'location', 'south');
13979 f35b593688a5 Changing the legend's interpreter property should be inherited by the Ben Abbott <bpabbott@mac.com> parents: 13937 diff changeset	1417
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1418 %!demo % bug 36408
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1419 %! clf;
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1420 %! option = 'right';
2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1421 %! subplot (3,1,1);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1422 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1423 %! xlabel xlabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1424 %! ylabel ylabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1425 %! title ('Subplots should adjust to the legend placed outside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1426 %! legend ({'1'}, 'location', 'northeastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1427 %! legend (option);
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1428 %! subplot (3,1,2);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1429 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1430 %! xlabel xlabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1431 %! ylabel ylabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1432 %! legend ({'1234567890'}, 'location', 'eastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1433 %! legend (option);
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1434 %! subplot (3,1,3);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1435 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1436 %! xlabel xlabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1437 %! ylabel ylabel;
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1438 %! legend ({'12345678901234567890'}, 'location', 'southeastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1439 %! legend (option);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1440
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1441 %!demo % bug 36408
286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1442 %! clf;
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1443 %! option = 'right';
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1444 %! subplot (3,1,1);
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1445 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1446 %! title ('Subplots should adjust to the legend placed outside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1447 %! legend ({'1'}, 'location', 'northwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1448 %! legend (option);
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1449 %! subplot (3,1,2);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1450 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1451 %! legend ({'1234567890'}, 'location', 'westoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1452 %! legend (option);
16805 2281d957cde6 legend.m: Tweak code for Octave coding conventions. Rik <rik@octave.org> parents: 16800 diff changeset	1453 %! subplot (3,1,3);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1454 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1455 %! legend ({'12345678901234567890'}, 'location', 'southwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1456 %! legend (option);
16799 286904321282 Use unmodified axes "position" and "outerposition" properties for legend(). Ben Abbott <bpabbott@mac.com> parents: 16796 diff changeset	1457
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1458 %!demo % bug 36408
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1459 %! clf;
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1460 %! option = 'right';
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1461 %! subplot (3,1,1);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1462 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1463 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1464 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1465 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1466 %! title ('Subplots should adjust to the legend placed outside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1467 %! legend ({'1'}, 'location', 'northeastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1468 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1469 %! subplot (3,1,2);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1470 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1471 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1472 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1473 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1474 %! legend ({'1234567890'}, 'location', 'eastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1475 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1476 %! subplot (3,1,3);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1477 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1478 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1479 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1480 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1481 %! legend ({'12345678901234567890'}, 'location', 'southeastoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1482 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1483
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1484 %!demo % bug 36408
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1485 %! clf;
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1486 %! option = 'right';
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1487 %! subplot (3,1,1);
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1488 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1489 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1490 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1491 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1492 %! title ('Subplots should adjust to the legend placed outside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1493 %! legend ({'1'}, 'location', 'northwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1494 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1495 %! subplot (3,1,2);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1496 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1497 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1498 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1499 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1500 %! legend ({'1234567890'}, 'location', 'westoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1501 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1502 %! subplot (3,1,3);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1503 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1504 %! set (gca (), 'yaxislocation', 'right');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1505 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1506 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1507 %! legend ({'12345678901234567890'}, 'location', 'southwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1508 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1509
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1510 %!demo % bug 36408;
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1511 %! clf;
1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1512 %! option = 'right';
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1513 %! subplot (3,1,1);
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1514 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1515 %! set (gca (), 'xaxislocation', 'top');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1516 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1517 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1518 %! title ('Subplots should adjust to the legend placed outside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1519 %! legend ({'1'}, 'location', 'northwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1520 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1521 %! subplot (3,1,2);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1522 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1523 %! set (gca (), 'xaxislocation', 'top');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1524 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1525 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1526 %! legend ({'1234567890'}, 'location', 'westoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1527 %! legend (option);
16908 1c4be5dcacd5 Add demos to legend.m using subplots. Ben Abbott <bpabbott@mac.com> parents: 16885 diff changeset	1528 %! subplot (3,1,3);
16921 9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1529 %! plot (rand (1,4));
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1530 %! set (gca (), 'xaxislocation', 'top');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1531 %! xlabel ('xlabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1532 %! ylabel ('ylabel');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1533 %! legend ({'12345678901234567890'}, 'location', 'southwestoutside');
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1534 %! legend (option);
9a316ec12b5f legend.m: Use Matlab coding conventions in %!demo blocks so comparison script can run. Rik <rik@octave.org> parents: 16910 diff changeset	1535
17179 828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	1536 %!demo % bug 39697
17190 df4c4b7708a4 Add titles and clean-up plotting %!demos. Rik <rik@octave.org> parents: 17179 diff changeset	1537 %! clf;
17179 828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	1538 %! plot (1:10);
828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	1539 %! legend ("Legend Text");
828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	1540 %! title ({"Multi-line", "titles", "are a", "problem"});
828e8852efa9 legend.m: Add %!demo block showing bug #39697. Rik <rik@octave.org> parents: 17174 diff changeset	1541
16973 d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1542 %!test
17107 dbd64c9a16da Restore graphics toolkit after %!tests that alter it. Rik <rik@octave.org> parents: 17065 diff changeset	1543 %! toolkit = graphics_toolkit ("gnuplot");
17119 bd50e0660545 test: Add missing semicolons to suppress output in some plot %!tests. Rik <rik@octave.org> parents: 17107 diff changeset	1544 %! h = figure ("visible", "off");
16973 d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1545 %! unwind_protect
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1546 %! position = get (h, "position");
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1547 %! plot (rand (3));
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1548 %! legend ();
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1549 %! filename = sprintf ("%s.eps", tmpnam ());
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1550 %! print (filename);
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1551 %! unlink (filename);
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1552 %! assert (get (h, "position"), position);
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1553 %! unwind_protect_cleanup
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1554 %! close (h);
17107 dbd64c9a16da Restore graphics toolkit after %!tests that alter it. Rik <rik@octave.org> parents: 17065 diff changeset	1555 %! graphics_toolkit (toolkit);
16973 d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1556 %! end_unwind_protect
d429a05dc11c legend.m: Move %!test block below %!demo blocks per standard usage. Rik <rik@octave.org> parents: 16933 diff changeset	1557

Mercurial > octave

annotate scripts/plot/legend.m @ 17281:bc924baa2c4e