%這個程序是模擬4f系統(tǒng)濾波處理，在濾波面加菲涅爾濾波片
clc;
clear?all;

%模擬4f系統(tǒng)對圖像進行濾波處理
V=imread（‘D:\3.bmp‘）;?????%讀入字母V
V=rgb2gray（V）;
V=im2double（V）;
subplot（121）;imshow（V）;title（‘字母V‘）;
V1=fftshift（fft2（V））;?????%?將圖像頻譜低頻部分移到中央，高頻部分移到四周
subplot（122）;imshow（abs（V1）*16/max（max（abs（V1））））;title（‘字母V經(jīng)物面到達頻譜面后的頻譜圖‘）;?%字母V經(jīng)物面到達頻譜面后的頻譜圖


r=16;
a=4*sqrt（r）;
b=0;
%生成菲涅爾濾波片
F=ones（256256）;
for?k=1:30
????p=6*sqrt（k*r）;