annotate scripts/image/imshow.m @ 8920:eb63fbe60fab

update copyright notices
author John W. Eaton <jwe@octave.org>
date Sat, 07 Mar 2009 10:41:27 -0500
parents 40aa36406a94
children 1bf0ce0930be
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7017
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7016
diff changeset
1 ## Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2004, 2005,
8920
eb63fbe60fab update copyright notices
John W. Eaton <jwe@octave.org>
parents: 8117
diff changeset
2 ## 2006, 2007, 2008 John W. Eaton
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
3 ##
2313
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
4 ## This file is part of Octave.
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
5 ##
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
6 ## Octave is free software; you can redistribute it and/or modify it
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
7 ## 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: 6757
diff changeset
8 ## the Free Software Foundation; either version 3 of the License, or (at
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6757
diff changeset
9 ## your option) any later version.
2313
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
10 ##
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
11 ## Octave is distributed in the hope that it will be useful, but
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
12 ## WITHOUT ANY WARRANTY; without even the implied warranty of
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
13 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
14 ## General Public License for more details.
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
15 ##
5ca126254d15 [project @ 1996-07-11 21:25:22 by jwe]
jwe
parents: 2312
diff changeset
16 ## 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: 6757
diff changeset
17 ## along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6757
diff changeset
18 ## <http://www.gnu.org/licenses/>.
1024
56520a75b5b3 [project @ 1995-01-11 20:30:04 by jwe]
jwe
parents: 904
diff changeset
19
3381
69b167451491 [project @ 1999-12-15 20:48:10 by jwe]
jwe
parents: 3373
diff changeset
20 ## -*- texinfo -*-
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
21 ## @deftypefn {Function File} {} imshow (@var{im})
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
22 ## @deftypefnx {Function File} {} imshow (@var{im}, @var{limits})
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
23 ## @deftypefnx {Function File} {} imshow (@var{im}, @var{map})
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
24 ## @deftypefnx {Function File} {} imshow (@var{rgb}, @dots{})
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
25 ## @deftypefnx {Function File} {} imshow (@var{filename})
6309
6a60e68fc4b1 [project @ 2007-02-15 09:49:27 by jwe]
jwe
parents: 6219
diff changeset
26 ## @deftypefnx {Function File} {} imshow (@dots{}, @var{string_param1}, @var{value1}, @dots{})
6368
ec2a523713b5 [project @ 2007-02-28 22:07:24 by jwe]
jwe
parents: 6310
diff changeset
27 ## Display the image @var{im}, where @var{im} can be a 2-dimensional
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
28 ## (gray-scale image) or a 3-dimensional (RGB image) matrix.
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
29 ##
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
30 ## If @var{limits} is a 2-element vector @code{[@var{low}, @var{high}]},
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
31 ## the image is shown using a display range between @var{low} and
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
32 ## @var{high}. If an empty matrix is passed for @var{limits}, the
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
33 ## display range is computed as the range between the minimal and the
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
34 ## maximal value in the image.
3426
f8dde1807dee [project @ 2000-01-13 08:40:00 by jwe]
jwe
parents: 3381
diff changeset
35 ##
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
36 ## If @var{map} is a valid color map, the image will be shown as an indexed
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
37 ## image using the supplied color map.
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
38 ##
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
39 ## If a file name is given instead of an image, the file will be read and
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
40 ## shown.
3426
f8dde1807dee [project @ 2000-01-13 08:40:00 by jwe]
jwe
parents: 3381
diff changeset
41 ##
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
42 ## If given, the parameter @var{string_param1} has value
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
43 ## @var{value1}. @var{string_param1} can be any of the following:
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
44 ## @table @samp
6368
ec2a523713b5 [project @ 2007-02-28 22:07:24 by jwe]
jwe
parents: 6310
diff changeset
45 ## @item "displayrange"
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
46 ## @var{value1} is the display range as described above.
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
47 ## @end table
5642
2618a0750ae6 [project @ 2006-03-06 21:26:48 by jwe]
jwe
parents: 5443
diff changeset
48 ## @seealso{image, imagesc, colormap, gray2ind, rgb2ind}
3373
36405da8e173 [project @ 1999-11-23 20:54:17 by jwe]
jwe
parents: 3202
diff changeset
49 ## @end deftypefn
904
3470f1e25a79 [project @ 1994-11-09 21:22:15 by jwe]
jwe
parents: 559
diff changeset
50
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
51 ## Author: Stefan van der Walt <stefan@sun.ac.za>
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
52 ## Author: Soren Hauberg <hauberg at gmail dot com>
2312
204cc7db6f4a [project @ 1996-07-11 21:20:36 by jwe]
jwe
parents: 2311
diff changeset
53 ## Adapted-By: jwe
559
4e826edfbc56 [project @ 1994-07-25 22:18:28 by jwe]
jwe
parents:
diff changeset
54
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
55 function h = imshow (im, varargin)
559
4e826edfbc56 [project @ 1994-07-25 22:18:28 by jwe]
jwe
parents:
diff changeset
56
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
57 if (nargin == 0)
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
58 print_usage ();
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
59 endif
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
60
7328
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
61 display_range = NA;
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
62 true_color = false;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
63 indexed = false;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
64
5935
01ff100fcd64 [project @ 2006-08-17 20:40:58 by jwe]
jwe
parents: 5934
diff changeset
65 ## Get the image.
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
66 if (ischar (im))
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
67 ## Eventually, this should be imread.
7931
de26beacb20f imread.m: simplify; loadimage.m: deprecate
John W. Eaton <jwe@octave.org>
parents: 7930
diff changeset
68 [im, map] = imread (im);
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
69 indexed = true;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
70 colormap (map);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
71 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
72
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
73 if (! (isnumeric (im) && (ndims (im) == 2 || ndims (im) == 3)))
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
74 error ("imshow: first argument must be an image or the filename of an image");
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
75 endif
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
76
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
77 if (ndims (im) == 2)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
78 if (! indexed)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
79 colormap (gray ());
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
80 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
81 elseif (size (im, 3) == 3)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
82 if (ismember (class (im), {"uint8", "uint16", "double", "single"}))
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
83 true_color = true;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
84 else
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
85 error ("imshow: color image must be uint8, uint16, double, or single");
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
86 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
87 else
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
88 error ("imshow: expecting MxN or MxNx3 matrix for image");
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
89 endif
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
90
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
91 narg = 1;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
92 while (narg <= numel (varargin))
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
93 arg = varargin{narg++};
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
94 if (isnumeric (arg))
7331
3ed85de5922c [project @ 2007-12-21 17:40:20 by jwe]
jwe
parents: 7328
diff changeset
95 if (numel (arg) == 2 || isempty (arg))
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
96 display_range = arg;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
97 elseif (columns (arg) == 3)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
98 indexed = true;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
99 colormap (arg);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
100 elseif (! isempty (arg))
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
101 error ("imshow: argument number %d is invalid", narg+1);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
102 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
103 elseif (ischar (arg))
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
104 switch (arg)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
105 case "displayrange";
8117
40aa36406a94 Fix for display_range in imshow
Kris Thielemans
parents: 7931
diff changeset
106 display_range = varargin{narg++};
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
107 case {"truesize", "initialmagnification"}
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
108 warning ("image: zoom argument ignored -- use GUI features");
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
109 otherwise
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
110 warning ("imshow: unrecognized property %s", arg);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
111 narg++;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
112 endswitch
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
113 else
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
114 error ("imshow: argument number %d is invalid", narg+1);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
115 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
116 endwhile
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
117
8117
40aa36406a94 Fix for display_range in imshow
Kris Thielemans
parents: 7931
diff changeset
118 ## Set default display range if display_range not set yet.
7328
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
119 if (isempty (display_range))
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
120 display_range = [min(im(:)), max(im(:))];
8117
40aa36406a94 Fix for display_range in imshow
Kris Thielemans
parents: 7931
diff changeset
121 elseif (isna (display_range))
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
122 t = class (im);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
123 switch (t)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
124 case {"double", "single", "logical"}
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
125 display_range = [0, 1];
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
126 case {"int8", "int16", "int32", "uint8", "uint16", "uint32"}
7328
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
127 ## For compatibility, uint8 data should not be handled as
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
128 ## double. Doing so is a quick fix to allow the images to be
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
129 ## displayed correctly.
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
130 display_range = double ([intmin(t), intmax(t)]);
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
131 otherwise
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
132 error ("imshow: invalid data type for image");
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
133 endswitch
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
134 endif
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
135
5935
01ff100fcd64 [project @ 2006-08-17 20:40:58 by jwe]
jwe
parents: 5934
diff changeset
136 ## Check for complex images.
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
137 if (iscomplex (im))
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
138 warning ("imshow: only showing real part of complex image");
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
139 im = real (im);
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
140 endif
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
141
6219
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
142 nans = isnan (im(:));
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
143 if (any (nans))
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
144 warning ("Octave:imshow-NaN",
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
145 "imshow: pixels with NaN or NA values are set to minimum pixel value");
6219
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
146 im(nans) = display_range(1);
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
147 endif
ba9db82d85a8 [project @ 2006-12-27 17:53:34 by jwe]
jwe
parents: 6157
diff changeset
148
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
149 ## This is for compatibility.
7930
1f6eb3de1c4e __img__.m, imshow.m, __go_draw_axes__.m: improve handling of truecolor images
John W. Eaton <jwe@octave.org>
parents: 7511
diff changeset
150 if (! (indexed || (true_color && isinteger (im))) || islogical (im))
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
151 im = double (im);
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
152 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
153
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
154 ## Scale the image to the interval [0, 1] according to display_range.
7315
3ceb12c499e9 [project @ 2007-12-13 21:35:36 by jwe]
jwe
parents: 7074
diff changeset
155 if (! (true_color || indexed || islogical (im)))
7328
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
156 low = display_range(1);
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
157 high = display_range(2);
d0784e593d39 [project @ 2007-12-20 07:24:02 by jwe]
jwe
parents: 7321
diff changeset
158 im = (im-low)/(high-low);
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
159 im(im < 0) = 0;
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
160 im(im > 1) = 1;
4836
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
161 endif
6368
ec2a523713b5 [project @ 2007-02-28 22:07:24 by jwe]
jwe
parents: 6310
diff changeset
162
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
163 if (true_color)
7315
3ceb12c499e9 [project @ 2007-12-13 21:35:36 by jwe]
jwe
parents: 7074
diff changeset
164 tmp = __img__ ([], [], im);
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
165 else
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
166 tmp = image (round ((rows (colormap ()) - 1) * im));
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
167 endif
7315
3ceb12c499e9 [project @ 2007-12-13 21:35:36 by jwe]
jwe
parents: 7074
diff changeset
168 set (gca (), "visible", "off");
7511
f028e7aa77a7 imshow.m: use axis ("image")
John W. Eaton <jwe@octave.org>
parents: 7331
diff changeset
169 axis ("image");
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
170
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
171 if (nargout > 0)
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
172 h = tmp;
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
173 endif
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
174
559
4e826edfbc56 [project @ 1994-07-25 22:18:28 by jwe]
jwe
parents:
diff changeset
175 endfunction
4836
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
176
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
177 %!error imshow () # no arguments
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
178 %!error imshow ({"cell"}) # No image or filename given
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
179 %!error imshow (ones(4,4,4)) # Too many dimensions in image
4836
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
180
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
181 %!demo
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
182 %! imshow ("default.img");
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
183
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
184 %!demo
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
185 %! imshow ("default.img");
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
186 %! colormap ("autumn");
4836
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
187
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
188 %!demo
518e495e489f [project @ 2004-03-12 18:16:03 by jwe]
jwe
parents: 3457
diff changeset
189 %! [I, M] = loadimage ("default.img");
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
190 %! imshow (I, M);
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
191
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
192 %!demo
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
193 %! [I, M] = loadimage ("default.img");
5934
8702f00329bf [project @ 2006-08-17 20:29:51 by jwe]
jwe
parents: 5642
diff changeset
194 %! imshow (cat(3, I, I*0.5, I*0.8));
5318
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
195
9a72639b62a7 [project @ 2005-04-28 18:44:27 by jwe]
jwe
parents: 5307
diff changeset
196 %!demo
7074
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
197 %! imshow (rand (100, 100));
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
198
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
199 %!demo
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
200 %! imshow (rand (100, 100, 3));
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
201
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
202 %!demo
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
203 %! imshow (100*rand (100, 100, 3));
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
204
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
205 %!demo
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
206 %! imshow (rand (100, 100));
87151f298e6a [project @ 2007-10-26 17:57:34 by jwe]
jwe
parents: 7017
diff changeset
207 %! colormap (jet);