計算全息close all clc clear
A=zeros(64)
A(15:20,20:40)=1 A(15:50,20:25)=1
A(45:50,20:40)=1 A(30:34,20:35)=1
％ ppp=exp(rand(64)*pi*2*i) A=A.*ppp
％ Author s email: zjliu2001@163.com
figure imshow(abs(A),[])
Fa=fft2(fftshift(A)) fs=fftshift(Fa)
Am=abs(fs) ％ amplitude
Ph=angle(fs) ％ phase
s=11 ％ 這表示邊長嗎？
cgh=zeros(64*s)
th=max(max(abs(fs)))
標簽：
20
close
clear
zeros
上傳時間：
2014-10-13
上傳用戶：wweqas
