asm MATLAB程序

这是经过改编的asm实现过程的程序，可以用已经标记的图像来进行训练和测试，而无需一定要人工标定.是用MATLAB编写的，比较容易懂。

%%%%%%%%%%%%%%%%%%%%%%%%%%
%（c） Ghassan Hamarneh 1999
%%%%%%%%%%%%%%%%%%%%%%%%%%
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）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件         327  2000-05-23 18:31  GetNormalAngle.m
     文件        1204  2004-07-08 20:14  GetNumPyramidLevels.m
     文件        8447  2004-07-08 11:00  GetProfileStatistics.m
     文件         830  2000-05-23 18:30  GetShapeStatistics.m
     文件        3976  2004-08-01 00:21  GetTrnSetCoor2.m
     文件         878  2004-07-08 17:56  GetTrnSetCoor.m
     文件        1535  2000-05-23 18:31  GetWeights.m
     文件        1406  2000-05-23 18:30  landmark.m
     文件         377  2004-07-19 20:45  LimitTheB.m
     文件         446  2004-04-05 19:08  LimitTheJump.m
     文件         820  2000-05-23 18:32  NormalizeShape.m
     文件        1358  2000-05-23 18:30  PlotShapes.m
     文件         635  2004-04-05 19:14  ScaleRotateTranslate2.m
     文件         543  2004-07-06 20:25  ScaleRotateTranslate.m
     文件        2266  2004-08-17 09:19  TryWeights2.m
     文件        1542  2004-08-17 09:16  TryWeights.m
     文件         340  2005-04-07 15:22  readme.txt
     文件         844  2000-05-23 18:30  AlignShapeToShape.m
     文件        1852  2000-05-23 18:31  AlignTrnSetCoor.m
     文件       10608  2005-04-07 13:49  asm.m
     文件         239  2000-05-23 18:32  find_db.m
     文件         598  2004-04-05 19:15  find_dx.m
     文件       10995  2004-07-19 21:29  FindShapeInImage.m
     文件         815  2000-05-23 18:32  GetBeforeAfterPts.m
     文件        3585  2004-08-01 00:06  getdx.m
     文件         963  2000-05-23 18:31  GetImagePyramid.m
     文件        1485  2000-05-23 18:31  GetLineCoorsThruPnt.m
     文件        1937  2000-05-23 18:31  GetMatchingPosition.m
     文件         804  2004-07-06 14:10  GetMaxNumPyramidLevels.m