cellfunallelem.m

Go to the documentation of this file.

function resArr=cellfunallelem(hFunc,inpCell,varargin)
nDimVec=cellfun('ndims',inpCell);
nDims=max(nDimVec(:));
sizeMat=zeros([nDims size(inpCell)]);
for iDim=1:nDims
    sizeMat(iDim,:)=reshape(cellfun('size',inpCell,iDim),1,[]);
end
%
nRealDimMat=sum(sizeMat~=1,1);
nRealDims=max(nRealDimMat(:));
%
for iRealDim=1:nRealDims-1
    inpCell=cellfun(hFunc,inpCell,'UniformOutput',false);
end
%
resArr=cellfun(hFunc,inpCell,varargin{:});