closefigures.m

来自「Continuous Profile Models (CPM) Matlab T」· M 代码 · 共 19 行

% function nothing = closefigures(figInd)
%
% vector of figure numbers, if not provided,
% does 1:gcf

function nothing = closefigures(figInd)

if ~exist('figInd')
    figInd = 1:gcf;
end

for ii=reverse(figInd)
  if checkfigs(ii)
      close(ii);
  end
end