Mercurial > hg > octave-lyh
annotate scripts/plot/semilogy.m @ 13090:7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
* semilogx.m, semilogy.m, loglog.m: New demos.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sat, 03 Sep 2011 18:46:09 -0400 |
parents | c792872f8942 |
children | 2e2738837a24 |
rev | line source |
---|---|
11523 | 1 ## Copyright (C) 1993-2011 John W. Eaton |
2313 | 2 ## |
3 ## This file is part of Octave. | |
4 ## | |
5 ## Octave is free software; you can redistribute it and/or modify it | |
6 ## under the terms of the GNU General Public License as published by | |
7016 | 7 ## the Free Software Foundation; either version 3 of the License, or (at |
8 ## your option) any later version. | |
2313 | 9 ## |
10 ## Octave is distributed in the hope that it will be useful, but | |
11 ## WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
13 ## General Public License for more details. | |
14 ## | |
15 ## You should have received a copy of the GNU General Public License | |
7016 | 16 ## along with Octave; see the file COPYING. If not, see |
17 ## <http://www.gnu.org/licenses/>. | |
245 | 18 |
3368 | 19 ## -*- texinfo -*- |
10730
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
20 ## @deftypefn {Function File} {} semilogy (@var{y}) |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
21 ## @deftypefnx {Function File} {} semilogy (@var{x}, @var{y}) |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
22 ## @deftypefnx {Function File} {} semilogy (@var{x}, @var{y}, @var{property}, @var{value}, @dots{}) |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
23 ## @deftypefnx {Function File} {} semilogy (@var{x}, @var{y}, @var{fmt}) |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
24 ## @deftypefnx {Function File} {} semilogy (@var{h}, @dots{}) |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
25 ## @deftypefnx {Function File} {@var{h} =} semilogy (@dots{}) |
10687
a8ce6bdecce5
Improve documentation strings.
Rik <octave@nomad.inbox5.com>
parents:
10647
diff
changeset
|
26 ## Produce a two-dimensional plot using a logarithmic scale for the @var{y} |
10730
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
27 ## axis. See the documentation of @code{plot} for a description of the |
6895 | 28 ## arguments that @code{semilogy} will accept. |
29 ## @seealso{plot, semilogx, loglog} | |
3368 | 30 ## @end deftypefn |
4 | 31 |
2314 | 32 ## Author: jwe |
33 | |
6302 | 34 function retval = semilogy (varargin) |
4 | 35 |
10730
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
36 [h, varargin, nargs] = __plt_get_axis_arg__ ("semilogy", varargin{:}); |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
37 |
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
38 if (nargs < 1) |
11587
c792872f8942
all script files: untabify and strip trailing whitespace
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
39 print_usage(); |
10730
390d93e20531
Plot commands now print usage information without errors
Rik <octave@nomad.inbox5.com>
parents:
10687
diff
changeset
|
40 endif |
7216 | 41 |
7207 | 42 oldh = gca (); |
43 unwind_protect | |
44 axes (h); | |
45 newplot (); | |
3063 | 46 |
7207 | 47 set (h, "yscale", "log"); |
10647
5c6b73a844e4
Plot minor ticks for semilog plots
Rik <octave@nomad.inbox5.com>
parents:
7216
diff
changeset
|
48 if (any( strcmp (get (gca, "nextplot"), {"new", "replace"}))) |
5c6b73a844e4
Plot minor ticks for semilog plots
Rik <octave@nomad.inbox5.com>
parents:
7216
diff
changeset
|
49 set (h, "yminortick", "on"); |
5c6b73a844e4
Plot minor ticks for semilog plots
Rik <octave@nomad.inbox5.com>
parents:
7216
diff
changeset
|
50 endif |
4 | 51 |
7207 | 52 tmp = __plt__ ("semilogy", h, varargin{:}); |
6302 | 53 |
7207 | 54 if (nargout > 0) |
55 retval = tmp; | |
56 endif | |
57 | |
58 unwind_protect_cleanup | |
59 axes (oldh); | |
60 end_unwind_protect | |
4 | 61 |
62 endfunction | |
13090
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
63 |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
64 %!demo |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
65 %! x = 1:0.01:10; |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
66 %! y = (x .* (1 + rand (size (x)))) .^ 2; |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
67 %! semilogy (x, y); |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
68 |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
69 ## Remove from test statistics. No real tests possible. |
7f127e079a7c
codesprint: demos for semilogx, semilogy, and loglog
John W. Eaton <jwe@octave.org>
parents:
11587
diff
changeset
|
70 %!assert (1) |