www.gusucode.com > mbctools 工具箱 matlab 源码程序 > mbctools/@sweepset/cell2sweeps.m

    function S= cell2sweeps(S,c)
%CELL2sweeps convert cell to sweepset

%  Copyright 2000-2007 The MathWorks, Inc. and Ford Global Technologies, Inc.



nv= cellfun('size',c,2);
if ~all(nv==size(S,2))
   error(message('mbc:sweepset:InvalidArgument1'))
end
if length(c)~=size(S,3)
   error(message('mbc:sweepset:InvalidArgument2'))
end

S.data= cat(1,c{:});
S.baddata = sparse(size(S.data,1),size(S.data,2));


% update sweep info (in dataset object)
ts= cellfun('size',c,1);
S.xregdataset= xregdataset(testnum(S),type(S),ts(:)');