function?H?=?CalcH（P1?P2）
x?=?P1（:?1）;
y?=?P1（:?2）;
X?=?P2（:?1）;
Y?=?P2（:?2）;
A?=?zeros（length（x（:））*29）;
for?i?=?1:length（x（:））
????a?=?[x（i）y（i）1];
????b?=?[0?0?0];
????c?=?[X（i）;Y（i）];
????d?=?-c*a;
????A（（i-1）*2+1:（i-1）*2+21:9）?=?[[a?b;b?a]?d];
end
[U?S?V]?=?svd（A）;
h?=?V（:9）;
H?=?reshape（h33）‘;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????333??2018-03-14?21:07??單應(yīng)性相關(guān)\CalcH.m

?????文件??????59360??2007-07-24?12:11??單應(yīng)性相關(guān)\firstView000000?-?副本.jpg

?????文件??????59360??2007-07-24?12:11??單應(yīng)性相關(guān)\firstView000000.jpg

?????文件??????65284??2007-07-24?12:11??單應(yīng)性相關(guān)\firstView000300.jpg

?????文件????1886067??2018-01-23?21:56??單應(yīng)性相關(guān)\H.mat

?????文件??????52841??2007-07-24?12:10??單應(yīng)性相關(guān)\secondView000000?-?副本.jpg

?????文件??????52841??2007-07-24?12:10??單應(yīng)性相關(guān)\secondView000000.jpg

?????文件??????55860??2007-07-24?12:11??單應(yīng)性相關(guān)\secondView000300.jpg

?????文件????????469??2018-01-23?21:33??單應(yīng)性相關(guān)\SelectPoint.m

?????文件????????730??2018-04-09?21:21??單應(yīng)性相關(guān)\testH.m

?????文件????????164??2018-03-14?21:08??單應(yīng)性相關(guān)\WarpH.m

?????文件????????111??2018-06-17?20:30??單應(yīng)性相關(guān)\程序運行說明.txt

?????目錄??????????0??2018-06-17?20:29??單應(yīng)性相關(guān)

-----------?---------??----------?-----??----

??????????????2233420????????????????????13