Changeset 79 for distools/psem.m

Timestamp:

07/23/13 12:22:18 (11 years ago)

Author:

bduin

Message:

 

File:

• distools/psem.m (modified) (3 diffs)

distools/psem.m

@@ -79 +79 @@
 end
 if nargin < 1 | isempty(d),
-  W = mapping(mfilename,{alf,pzero,prec});
+  W = prmapping(mfilename,{alf,pzero,prec});
   W = setname(W,'PE embedding');
   return
@@ -133 +133 @@
   L = L(J);          % Eigenvalues
 
-  W = mapping(mfilename,'trained',{Q, pars{2},pars{3},L,pars{5},pars{6}},[],m,length(J));
+  W = prmapping(mfilename,'trained',{Q, pars{2},pars{3},L,pars{5},pars{6}},[],m,length(J));
   W = setname(W,'PE embedding');
   return
@@ -186 +186 @@
 % Determine the mapping depending on pzero
 if pzero == 0,
-  W = mapping(mfilename,'trained',{Q,mean(+d,2)',pzero,L,sig,prec},[],m,sum(sig));
+  W = prmapping(mfilename,'trained',{Q,mean(+d,2)',pzero,L,sig,prec},[],m,sum(sig));
 else
-  W = mapping(mfilename,'trained',{Q,+d(:,pzero)',pzero,L,sig,prec},[],m,sum(sig));
+  W = prmapping(mfilename,'trained',{Q,+d(:,pzero)',pzero,L,sig,prec},[],m,sum(sig));
 end
 W = setname(W,'PE embedding');