%%%%%%自適應局部降噪濾波
clearclc
f=imread（‘E:\學習\A+數字圖像處理\實驗1\board-orig-gauss.bmp‘）;
[MN]=size（f）;
f=double（f）;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%將原圖像四周各擴展三行三列
row1=[f（11）f（11）f（11）f（1:）f（1N）f（1N）f（1N）];?%此為頂部的行
rowm=[f（M1）f（M1）f（M1）f（M:）f（MN）f（MN）f（MN）];?%此為底部的行
col1=f（:1）;?%此為左部的列
coln=f（:N）;?%此為右部的列
f1=[row1;row1;row1;col1col1col1fcolncolncoln;rowm;rowm;rowm];?%將原圖像四周各擴展三行三列
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%設置濾波器參數并進行濾波
f2=zeros（MN）;%用矩陣f2從擴展后的矩陣f1中提取原范圍的圖像
varn=400;%已知噪聲方差為400
m=5;%設置子窗為5*5
dm=（m-1）/2;
for?i=4:M+3
????for?j=4:N+3
????????A=f1（i-dm:i+dmj-dm:j+dm）;%用矩陣A選取m*m個像素點進行濾波
????????[mlvarl]=MuVar（A）;
????????if?varl>=varn
????????????f2（i-3j-3）=f1（ij）-（varn/varl）*（f1（ij）-ml）;
????????????f1（ij）=f2（i-3j-3）;
????????else
????????????f2（i-3j-3）=ml;
????????????f1（ij）=ml;
????????end
????end
end
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
g=uint8（f2）;
imwrite（g‘E:\學習\A+數字圖像處理\實驗1\board-orig-gauss-adplocal.bmp‘）;
imshow（g）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2019-04-15?21:29??圖像加噪&濾波\
?????文件????????1276??2018-11-01?14:48??圖像加噪&濾波\AdpLocal.m
?????文件????????1704??2018-11-01?00:01??圖像加噪&濾波\AdpMedFilter.m
?????文件?????????723??2018-10-31?17:39??圖像加噪&濾波\AlphaFilter.m
?????文件????????1163??2018-10-31?21:43??圖像加噪&濾波\AlphaTrimmed.m
?????文件??????208950??2018-11-01?14:41??圖像加噪&濾波\board-orig-gauss-adplocal.bmp
?????文件??????208950??2018-11-01?14:44??圖像加噪&濾波\board-orig-gauss-adplocal1.bmp
?????文件??????208950??2018-11-01?14:43??圖像加噪&濾波\board-orig-gauss-adplocal2.bmp
?????文件??????208950??2018-10-31?23:51??圖像加噪&濾波\board-orig-gauss-adpmed.bmp
?????文件??????208950??2018-10-31?19:30??圖像加噪&濾波\board-orig-gauss-alpha.bmp
?????文件??????208950??2018-10-31?18:50??圖像加噪&濾波\board-orig-gauss.bmp
?????文件??????208950??2018-10-31?23:55??圖像加噪&濾波\board-orig-salt&pepper-adpmed.bmp
?????文件??????208950??2018-10-31?20:45??圖像加噪&濾波\board-orig-salt&pepper-alpha.bmp
?????文件??????208950??2018-10-30?11:58??圖像加噪&濾波\board-orig-salt&pepper.bmp
?????文件?????????717??2018-10-31?18:50??圖像加噪&濾波\Gauss.m
?????文件?????????284??2018-11-01?14:41??圖像加噪&濾波\MuVar.m
?????文件?????????527??2018-10-31?21:10??圖像加噪&濾波\PaiXu.m
?????文件?????????520??2018-10-30?11:57??圖像加噪&濾波\SaltPepper.m
?????文件??????757762??2019-04-15?21:29??圖像加噪&濾波\實驗報告.pdf