Mercurial > octave-nkf
comparison scripts/image/flag.m @ 14641:5f1d4def40e1
improve compatibility of colormap functions
* autumn.m, bone.m, cool.m, copper.m, flag.m, gmap40.m, gray.m, hot.m,
hsv.m, jet.m, lines.m, ocean.m, pink.m, prism.m, rainbow.m,
spring.m, summer.m, winter: Always size and return 0x3 when size < 1.
Return same values as Matlab when size == 1.
| author | Carnë Draug <carandraug+dev@gmail.com> |
|---|---|
| date | Wed, 16 May 2012 16:52:44 -0400 |
| parents | b9c02ee24de1 |
| children | 1a800034d443 |
comparison
equal
deleted
inserted
replaced
| 14640:b9c02ee24de1 | 14641:5f1d4def40e1 |
|---|---|
| 41 endif | 41 endif |
| 42 else | 42 else |
| 43 print_usage (); | 43 print_usage (); |
| 44 endif | 44 endif |
| 45 | 45 |
| 46 C = [1, 0, 0; 1, 1, 1; 0, 0, 1; 0, 0, 0]; | 46 if (n == 1) |
| 47 map = C(rem (0:(n-1), 4) + 1, :); | 47 map = [1, 0, 0]; |
| 48 elseif (n > 1) | |
| 49 C = [1, 0, 0; 1, 1, 1; 0, 0, 1; 0, 0, 0]; | |
| 50 map = C(rem (0:(n-1), 4) + 1, :); | |
| 51 else | |
| 52 map = zeros (0, 3); | |
| 53 endif | |
| 48 | 54 |
| 49 endfunction | 55 endfunction |
| 50 | 56 |
| 51 | 57 |
| 52 %!demo | 58 %!demo |