%%%%%%%%%%%%%%%%%%%%%%%%%%
%（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