blob: f0014971a904cb63134505f160566669b18902e2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
function mags = gtmmag(net, latent_data)
%GTMMAG Magnification factors for a GTM
%
% Description
% MAGS = GTMMAG(NET, LATENTDATA) takes a GTM structure NET, and
% computes the magnification factors for each point the latent space
% contained in LATENTDATA.
%
% See also
% GTM, GTMPOST, GTMLMEAN
%
% Copyright (c) Ian T Nabney (1996-2001)
errstring = consist(net, 'gtm');
if ~isempty(errstring)
error(errstring);
end
Jacs = rbfjacob(net.rbfnet, latent_data);
nlatent = size(latent_data, 1);
mags = zeros(nlatent, 1);
temp = zeros(net.rbfnet.nin, net.rbfnet.nout);
for m = 1:nlatent
temp = squeeze(Jacs(m, :, :)); % Turn into a 2d matrix
mags(m) = sqrt(det(temp*temp'));
end
|
