【急救】求教各位大神，matlab做全息图
这个程序，后面缺少一段算法，通过算法可以制作出全息图，然后还有就是全息图的再现，拜托各位了，马上中期答辩，还没写出程序，会死人的PI=3.14159;
Image=imread('C:\Users\Administrator\Desktop\1.jpg');
N=512;
A=zeros(N,N);
B=zeros(N,N);
for I=1:1:256
for J=1:1:256
Num=double(Image(I,J,1));
A(0+I,0+J)=1-Num/255;
B(I,J)=0;
end
end
for I=1:1:N
for J=1:1:N
R=rand(1,1);
B(I,J)=A(I,J)*sin(R*2*PI);
A(I,J)=A(I,J)*cos(R*2*PI);
F(I,J)=A(I,J)+j*B(I,J);
end
end
F=fft2(F);
F=fftshift(F);
页:
[1]