lrm_view.m

轨迹聚类工具箱及其相关说明和文章（台风路径分类等）。如有问题可与[e-mail]联系

function Options = lrm_view(M,trajs,Options)
%LRM_View  View LRM_* model
%
%   AxesHandles = LRM_View(Model,[trajs],[Options])
%

% Scott Gaffney   5 February 2002
% Department of Information and Computer Science
% University of California, Irvine

PROGNAME = 'lrm_view';
if (~nargin)
  try; help(PROGNAME); catch; end
  return;
end

%%% Begin Argument Processing
%%
trajs = cexist('trajs',[]);
Options = cexist('Options',[]);
%%
%%% End Argument Processing

Options = DefaultOptions(Options);
bottompos = [0.1200    0.5676    0.3329    0.3267];
toppos    = [0.3900    0.5486    0.3743    0.3686];

if (~Options.SeparateFigs)
  if (isempty(Options.bfig))
    Options.bfig = figure('Units','normalized','Position',bottompos);
  end
  figure(Options.bfig);
end
Options = plot_regmix(M,trajs,Options);
info = listmodels(M.method);
set(gcf,'Name',info.description);




%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% Helper Functions
%%
function Options = DefaultOptions(Options);
Options = SetFieldDef(Options,'bfig',[]);
Options = SetFieldDef(Options,'SeparateFigs',0);