Mercurial > hg > octave-nkf

view scripts/image/gray2ind.m @ 559:4e826edfbc56

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-07-25 22:18:28 by jwe] Initial revision
author jwe
date Mon, 25 Jul 1994 22:19:05 +0000
parents
children 56520a75b5b3
line wrap: on
line source

function [X, map] = gray2ind(I,n)

  if(nargin == 1)
    n = 64;
  endif

  map = gray(n);

  X = round(I*(n-1)) + 1;

endfunction