autosc.m

这是国外一个PLS工具箱

% function autosc performs autoscaling
% the second input file is scaled on the average and standard deviation of the first one
function[xnorm]=autosc(xtr,xtest)
if nargin==1
  x=xtr;
else
  x=[xtr;xtest];
end
[o,v]=size(x);
xnorm=(x-ones(o,1)*mean(xtr))./(ones(o,1)*std(xtr));