run length encoding method $Id$
0001 function rlem = rle(o, sp) 0002 % run length encoding method 0003 % 0004 % $Id$ 0005 0006 if nargin < 1 0007 sp = native_space(o); 0008 end 0009 if isempty(sp) 0010 error('Need defined, or passed native space for run length encoding') 0011 end 0012 0013 o = maroi_matrix(o, sp); 0014 rlem = do_rle(o);