packstrs.m

来自「JLAB is a set of Matlab functions I have」· M 代码 · 共 17 行

function[x]=packstrs(x)
%PACKSTRS Removes empty entries from a cell array of strings
%   _________________________________________________________________
%   This is part of JLAB --- type 'help jlab' for more information
%   (C) 2002,2004 J.M. Lilly --- type 'help jlab_license' for details        
  
x=deblankstrs(x);
n=lengthcells(x);

index=find(n>=1);
if ~isempty(x)
  x=x(index);
else 
  x=[];
end