Browse code

starting som prediction fine-tuned class-performance visualisation

git-svn-id: https://svn.discofish.de/MATLAB/spmtoolbox/SVMCrossVal@112 83ab2cfd-5345-466c-8aeb-2b2739fb922d

Christoph Budziszewski authored on21/01/2009 16:34:25
Showing1 changed files
1 1
new file mode 100644
... ...
@@ -0,0 +1,69 @@
1
+function sompak_gui()
2
+
3
+%SOMPAK_GUI  A GUI for using SOM_PAK functions from Matlab.
4
+%
5
+%  sompak_gui
6
+%
7
+% Launches a GUI which allows the use of SOM_PAK functions from
8
+% Matlab. Notice that to use this function, the SOM_PAK programs must
9
+% be in your search path, or the variable 'SOM_PAKDIR' which is a
10
+% string containing the program path, must be defined in the
11
+% workspace. SOM_PAK programs can be found from:
12
+% http://www.cis.hut.fi/research/som_lvq_pak.shtml
13
+%  
14
+% See also SOM_GUI, SOMPAK_INIT_GUI, SOMPAK_SAMMON_GUI, SOMPAK_TRAIN_GUI.
15
+
16
+% Contributed to SOM Toolbox 2.0, February 2nd, 2000 by Juha Parhankangas
17
+% Copyright (c) by Juha Parhankangas
18
+% http://www.cis.hut.fi/projects/somtoolbox/
19
+
20
+% Juha Parhankangas 050100
21
+
22
+h=findobj(get(0,'Children'),'Tag','sompak_gui');
23
+if ~isempty(h)
24
+  figure(h);
25
+  return;
26
+end
27
+
28
+a = figure('Color',[0.8 0.8 0.8], ...
29
+	'PaperType','a4letter', ...
30
+	'Position',[689 536 210 70], ...
31
+	'Tag','sompak_gui');
32
+b = uicontrol('Parent',a, ...
33
+	'Units','points', ...
34
+	'BackgroundColor',[0.701961 0.701961 0.701961], ...
35
+        'Callback','sompak_init_gui',...
36
+	'FontWeight','demi', ...
37
+	'Position',[8 30 50 20], ...
38
+	'String','INIT', ...
39
+	'Tag','Pushbutton1');
40
+b = uicontrol('Parent',a, ...
41
+	'Units','points', ...
42
+	'BackgroundColor',[0.701961 0.701961 0.701961], ...
43
+        'Callback','sompak_train_gui',...
44
+	'FontWeight','demi', ...
45
+	'Position',[63 30 50 20], ...
46
+	'String','TRAIN', ...
47
+	'Tag','Pushbutton2');
48
+b = uicontrol('Parent',a, ...
49
+	'Units','points', ...
50
+	'BackgroundColor',[0.701961 0.701961 0.701961], ...
51
+        'Callback','sompak_sammon_gui',...
52
+	'FontWeight','demi', ...
53
+	'Position',[118 30 50 20], ...
54
+	'String','SAMMON', ...
55
+	'Tag','Pushbutton3');
56
+b = uicontrol('Parent',a, ...
57
+	'Units','points', ...
58
+	'BackgroundColor',[0.701961 0.701961 0.701961], ...
59
+	'Callback','close gcf', ...
60
+	'FontSize',9, ...
61
+	'FontWeight','demi', ...
62
+	'Position',[128 5 40 15], ...
63
+	'String','Close', ...
64
+	'Tag','Pushbutton4');
65
+
66
+
67
+
68
+
69
+