clear
%生成待檢測的圖像im1；
im1=0.6*ones（128128）;
im1（8090）=256;
im1（100100）=256;
imshow（im1）
%?確定鄰域的大小：5×5；
r=2;??????????????????????
k=1;
%?調用編寫的函數計算圖像的局域灰度概率矩陣；
P=target_detect（im1r）;??????
figure
mesh（P）
%檢測奇異點；
[Pr?Pc]=find（P>k/（2*r+1）^2+0.1）;??
figure
imshow（im1）
hold?on????????????????????
%?在圖像im1上標出檢測到的奇異點；
for?i=1:length（Pr）???????????
plot（Pc（i）Pr（i）‘g+‘）
end
hold?on
im2=0.6*ones（128128）;
im2（8190）=256;
im2（200200）=256;
r1=1;
k1=1;
%?檢測下一幀圖像中奇異點位置（上一幀檢測到的）附近鄰域是否存在奇異點；
P1=target_refine（PrPcim2r1）;??
%確定奇異點的位置；
[Prt?Pct]=find（P1>k1/（2*r1+1）^2+0.1）;??
%?標出最終檢測到的小目標
for?i=1:length（Prt）??????????????
??plot（Pct（i）Prt（i）‘ro‘）;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????????801??2020-11-04?19:39??based?dim?target?detection?and?tracking?infrared?image\main.m
?????文件?????????392??2020-11-04?19:39??based?dim?target?detection?and?tracking?infrared?image\target_detect.m
?????文件?????????381??2020-11-04?19:39??based?dim?target?detection?and?tracking?infrared?image\target_refine.m
?????文件???????24064??2020-11-04?19:39??based?dim?target?detection?and?tracking?infrared?image\│╠╨≥╘╦╨╨╦╡├≈.doc