rri_bootprocrust.m

国外的一个PLStoolbox,主要用于处理图象,也可以用来回归,欢迎使用

function rotatemat=rri_bootprocrust(origlv,bootlv)
%syntax rotatemat=rri_bootprocrust(origlv,bootlv)

%define coordinate space between orignal and bootstrap LVs
temp=origlv'*bootlv;

%orthogonalze space
[V,W,U]=svd(temp);

%determine procrustean transform
rotatemat=U*V';