clear?all
a=[1?1;???%理想邊界
???1?1];??
b=[1?1;????%檢測邊界
???1?1];
de=sum（sum（b==1））;???%檢測到的邊界數目
id=sum（sum（a==1））;???%理想的邊界數目
q=max（deid）;
sum=0;
[r?l]=find（a==1）;????%查找理想真實邊界的像素坐標點
[mn]=size（b）;
for?i=1:m
????for?j=1:n
????????if?（b（ij）==1?）????%檢測到的邊界像素點?要不就和真實邊界重合（等于3）要不就是孤立點（等于1）
??????????X=（r-i）.^2+（l-j）.^2;???%這個點到所有真實邊界點（也就是等于2的點）的距離
??????????mind=min（X）;??%這個點到所有真實邊界點的最小距離
??????????sum=sum+1/（mind+1）;
????????end
????end
end
p=sum/q

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

?????文件?????????44??2011-12-10?13:19??FOM圖像評價\程序雖小，但是很實用.txt

?????文件????????579??2011-12-05?18:55??FOM圖像評價\質量標準簡化.m

?????目錄??????????0??2011-12-10?13:18??FOM圖像評價

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

??????????????????623????????????????????3