Christoph Budziszewski
starting som prediction fine-tuned class-performance visualisation
Christoph Budziszewski commited 4dbef18 at 2009-01-21 16:34:25
som_plotmatrix.m
function som_plotmatrix(sM,D,Col,comps)
%SOM_PLOTMATRIX Visualize pairwise scatter plots and histograms.
%
% som_plotmatrix(sM,[sD],[Col],[comps])
%
% Input and output arguments ([]'s are optional):
% sM (struct) map struct
% [sD] (struct) data struct, corresponding to the map
% (matrix) data matrix (size dlen x dim)
% [Col] (matrix) size munits x 3, color for each map unit
% [comps] (vector) which components to plot (1:dim by default)
%
% See also: SOM_SHOW, SOM_ORDER_CPLANES.
% Copyright (c) 2000 by the SOM toolbox programming team.
% Contributed to SOM Toolbox on June 16th, 2000 by Juha Vesanto
% http://www.cis.hut.fi/projects/somtoolbox/
% Version 2.0beta juuso 140600
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%55
% sM
[munits dim] = size(sM.codebook);
M = sM.codebook;
% sD
if nargin>1 & ~isempty(D),
if isstruct(D), D = D.data; end
bmus = som_bmus(sM,D);
else D = []; bmus = [];
end
% Col
if nargin<3 | isempty(Col), Col = som_colorcode(sM); end
if ischar(Col), Col = som_colorcode(sM,Col); end
% comps
if nargin<4 | isempty(comps), comps = 1:dim; end
n = length(comps)+1;
% histogram bins
if ~isempty(D), C=D; else C=M; end
cHbins = cell(dim,1);
cAxis = cell(dim,1);
for i=1:dim,
if ~isempty(D), mima = [min(D(:,i)),max(D(:,i))];
else mima = [min(M(:,i)),max(M(:,i))];
end
cAxis{i} = mima;
 
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX