ASM ASM算法的matlab实现

ASM算法的matlab实现，完整的ASM算法流程，包含各个子程序

function [x2Newy2NewsThetatxty]=AlignShapeToShape（x1y1x2y2W）;
%function [x2Newy2NewsThetatxty]=AlignShapeToShape（x1y1x2y2W）; 
%align shape 2 to shape 1 i.e. only x2y2 change
%can be called as [x2Newy2New]=AlignShapeToShape（x1y1x2y2W）;

X1=x1‘*diag（W）;
Y1=y1‘*diag（W）;

X2=x2‘*diag（W）;
Y2=y2‘*diag（W）;
   
Z=（x2.^2 + y2.^2）‘*diag（W）;
w=sum（diag（W））;
C1=（x1.*x2 + y1.*y2）‘*diag（W）;
C2=（y1.*x2 - x1.*y2）‘*diag（W）;

%Ax=b x=A\b
Params=[X2 -Y2 w 0; Y2 X2 0 w; Z 0 X2 Y2; 0 Z -Y2 X2]\[X1;Y1;C1;C2];
ax=Params（1）; %s* cosTheta
ay=Params（2）; %s* sinTheta
tx=Params（3）;
ty=Params（4）;

Theta=atan（ay/ax）;
s=ax/cos（Theta）;

X=ScaleRotateTranslate（[x2;y2]sThetatxty）;
x2New=X（1      :end/2）;
y2New=X（end/2+1:end）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        731  2000-11-21 18:22  ASM\AlignShapeToShape.m

     文件       1715  2000-11-07 21:36  ASM\AlignTrnSetCoor.m

     文件       9357  2006-03-12 20:28  ASM\asm.m

     文件        308  2000-11-07 21:36  ASM\bartest.m

     文件       8173  2005-10-09 10:47  ASM\FindShapeInImage.m

     文件        807  2005-10-08 21:32  ASM\find_db.m

     文件        522  2005-10-08 13:09  ASM\find_dx.m

     文件        707  2000-11-07 21:36  ASM\GetBeforeAfterPts.m

     文件        780  2005-10-24 15:58  ASM\GetBeforeAfterPts_fc.m

     文件       3478  2005-10-27 10:37  ASM\GetdX.m

     文件        857  2000-11-07 21:36  ASM\GetImagePyramid.m

     文件        849  2005-10-13 16:00  ASM\GetInitPosPara.m

     文件       1356  2000-11-07 21:36  ASM\GetLineCoorsThruPnt.m

     文件       1817  2000-11-07 21:36  ASM\GetMatchingPosition.m

     文件        534  2001-11-13 22:09  ASM\GetMaxNumPyramidLevels.m

     文件        231  2000-11-07 21:36  ASM\GetNormalAngle.m

     文件       1095  2000-11-07 21:36  ASM\GetNumPyramidLevels.m

     文件       7821  2005-10-08 16:38  ASM\GetProfileStatistics.m

     文件        723  2000-11-07 21:36  ASM\GetShapeStatistics.m

     文件       1677  2005-11-04 14:33  ASM\GetTrnSetCoor.m

     文件       1408  2000-11-07 21:36  ASM\GetWeights.m

     文件       1368  2005-10-08 16:40  ASM\landmark.m

     文件        207  2000-11-07 21:36  ASM\LimitTheB.m

     文件        227  2000-11-07 21:36  ASM\LimitTheJump.m

     文件       6052  2005-09-26 14:48  ASM\myginput.m

     文件        713  2000-11-07 21:36  ASM\NormalizeShape.m

     文件        872  2002-11-12 22:53  ASM\PlotShapes.m

     文件        877  2002-11-12 22:19  ASM\PlotShapes_XT.m

     文件       1884  2001-11-13 23:27  ASM\redisplay.m

     文件        442  2000-11-07 21:36  ASM\ScaleRotateTranslate.m

............此处省略7个文件信息