plistid2cell.m

   1 function [idc, idsize] = plistid2cell(id)
   2 %%
   3 %% convert points id to cell array
   4 %% creates a row vector of string cells
   5 %%
   6
   7 if nargin ~= 1
   8         usage('[idc, idsize] = plistid2cell(id)')
   9 end
  10
  11 if isnumeric(id)
  12         idsize = size(id);
  13         for i=1:prod(idsize)
  14                 idc{i} = num2str(id(i));
  15         end
  16         % idc = reshape(idc, idsize);
  17 elseif ischar(id)
  18         for i=1:size(id, 1)
  19                 idc{i} = deblank(id(i,:));
  20         end
  21         idsize = [size(id, 1) 1];
  22 else
  23         idc = id;
  24         idsize = size(id);
  25 end