somtoolbox2/som_show_gui.m (4dbef18) - SVMCrossVal.git

som_show_gui.m

function fig = som_show_gui(input,varargin)

%SOM_SHOW_GUI A GUI for using SOM_SHOW and associated functions.
%
%  h = som_show_gui(sM);
%
%  Input and output arguments:
%    sM     (struct) a map struct: the SOM to visualize
%    h      (scalar) a handle to the GUI figure
%
% This is a graphical user interface to make the usage of SOM_SHOW and
% associated functions somewhat easier for beginning users of the SOM
% Toolbox.
%
% How to use the GUI: 
%  1. Start the GUI by giving command som_show_gui(sM);
%  2. Build a list of visualization planes using the buttons 
%     ('Add components', etc.) on the right 
%     - the options associated with each of the planes can be 
%       modified by selecting a plane from the list, and pressing
%       the 'Plane options' button
%     - the controls below the list apply to all planes
%     - the subplot grid size can be controlled using the 'subplots'
%       field on top right corner, e.g. '4 3' to get 4 times 3 grid
%  3. To visualize the planes, press the 'Visualize' button on the bottom.
%  4. To add hits, labels, trajectories (or comets) to the 
%     visualization, or clear them, or reset the colorbars, 
%     see the tools available from the 'Tools' menu. 
%     - the arguments to those tools are either given in the tool, 
%       or read from the workspace ('Select variable' buttons)
%     - the tools always apply to the latest figure created
%       by the GUI
%  5. To quit, press the 'Close' button on the bottom.
%
% Known bugs:
%  - Especially when using the adding tools, you can easily 
%    give arguments which do not fit each other, and this 
%    results in a lengthy (and often cryptic) error message.
%    In such a case, check the arguments you are giving to see
%    if there's something wrong with them. See function 
%    SOM_SHOW_ADD for more information on how the options 
%    can be set.
%  - The default values in the adding tools may not be 
%    very reasonable: you may have to try out different 
%    values for e.g. markersize before getting the kind of
%    result you want.
% 
% SOM_SHOW_GUI has two subfunctions: VIS_SHOW_GUI_COMP and 
% VIS_SHOW_GUI_TOOL. These are for internal use of SOM_SHOW_GUI.
%
% See also SOM_SHOW, SOM_SHOW_ADD, SOM_SHOW_CLEAR, SOM_RECOLORBAR.

% Copyright (c) 2000 by Roman Feldman and Juha Vesanto
% Contributed to SOM Toolbox on August 22nd, 2000
% http://www.cis.hut.fi/projects/somtoolbox/
 
% Version 2.0beta roman 160800 juuso 220800

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%                                    MAIN                                   %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

warning off;
if (nargin < 1)
  errordlg({'Make sure you have SOM as input argument'; ''; ...
            'example: som_show_gui(sMap)'},'Error in SOM_VIS: input arguments');
  return
end

if isstruct(input)
  fig_h = create_main_gui(input);
  if (nargout > 0) fig = fig_h; end
  return;

elseif ischar(input)
  action = lower(input);

% 
  udata = get(varargin{1},'UserData');
  plot_array = udata.plot_array;
  l = length(plot_array);
  list1_h = udata.h(1);

if (strcmp(action,''))
    errordlg('','Error in SOM_VIS: input arguments');
    return;

%%%%%%%%%%%%%%%%%%%%
  % add_selected_comp
  %
  elseif (strcmp(action,'add_selected_comp'))
    if isempty(plot_array(1).string), tmp = 1; else tmp = l+1; end 
    [sel,ok] = listdlg('ListString',udata.sM.comp_names,...
                       'Name','Component selection',...
                       'PromptString','Select components to add');  
    if ok & ~isempty(sel), 
      for i=1:length(sel),
        plot_array(tmp+i-1).string = udata.sM.comp_names{sel(i)}; 
        plot_array(tmp+i-1).args = {'comp' sel(i)};
        udata.property{tmp+i-1} = {0};
      end      
      set(list1_h,'Value',tmp+i-1, ...
                  'String',{plot_array(:).string});
    end