cplot.m

I developed an algorithm for using local ICA in denoising multidimensional data. It uses delay embed

function cplot(varargin);
% plots multiple graphs
%
%

hold off
col='bgrcmk';

switch varargin{1}
 case 'split'
  subplot(nargin-1,1,1)
  for i=2:nargin
   subplot(nargin-1,1,i-1)
   plot(varargin{i})
  end
  subplot(1,1,1)
  return
 case 'combined'
  for i=2:nargin
   plot(varargin{i},col(mod(i-1,6)+1))
   hold on
  end
  hold off
end
return