Mercurial > hg > octave-nkf
comparison scripts/image/rgb2ind.m @ 11587:c792872f8942
all script files: untabify and strip trailing whitespace
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 17:35:29 -0500 |
parents | fd0a3ac60b0e |
children | 72c96de7a403 |
comparison
equal
deleted
inserted
replaced
11586:12df7854fa7c | 11587:c792872f8942 |
---|---|
32 function [x, map] = rgb2ind (R, G, B) | 32 function [x, map] = rgb2ind (R, G, B) |
33 | 33 |
34 if (nargin != 1 && nargin != 3) | 34 if (nargin != 1 && nargin != 3) |
35 print_usage (); | 35 print_usage (); |
36 endif | 36 endif |
37 | 37 |
38 if (nargin == 1) | 38 if (nargin == 1) |
39 rgb = R; | 39 rgb = R; |
40 if (length (size (rgb)) == 3 && size (rgb, 3) == 3) | 40 if (length (size (rgb)) == 3 && size (rgb, 3) == 3) |
41 R = rgb(:,:,1); | 41 R = rgb(:,:,1); |
42 G = rgb(:,:,2); | 42 G = rgb(:,:,2); |