function?[ker]=kernel（f）
ker=zeros（2*f+12*f+1）;
for?d=1:f????
??value=?1?/（2*d+1）^2?;????
??for?i=-d:d
????for?j=-d:d
????????ker（f+1-if+1-j）=?ker（f+1-if+1-j）?+?value?;
????end
??end
end
ker?=?ker?./?f;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????????217??2015-12-21?18:57??程序\kernel.m
?????文件????????1975??2015-12-21?18:48??程序\non_localmeansfilter.m
?????文件?????????400??2015-12-22?22:23??程序\test.m
?????目錄???????????0??2015-12-30?16:05??程序\