光电工程师社区
标题:
涡旋光束!!!
[打印本页]
作者:
wangzi007
时间:
2014-5-6 13:31
标题:
涡旋光束!!!
optica.gif
(110.31 KB, 下载次数: 76)
下载附件
保存到相册
2014-5-6 13:30 上传
matlab程序!!!
clc
clear
close all;
M=512;N=512; [x,y]=meshgrid(-M/2+1:M/2,-N/2+1:N/2);
%============生成光学涡旋相位图==========%
theta=atan2(x,y);
L=30;
r=sqrt(x.^2+y.^2);
a=0.01;
vortex=exp(1i*L*theta).*cyl(x,y,N);
% vortex=(sqrt(2)*r/a)^L*exp(-r.^2/a)*exp(-1i*L*theta);
vortex_I=abs(vortex).^2;
vortex_phase=angle(vortex);
vortex_counter=vortex/max(max(vortex));%归一化
figure(1)
imshow(vortex_phase);
F=fftshift(fft2(vortex_counter));
F1=abs(F)/max(max(abs(F)));
figure(2)
imshow(F1);
figure(3)
plot(r,F1);
该贴已经同步到
wangzi007的微博
作者:
扬帆起航
时间:
2014-5-6 14:54
这个有什么用处啊,高达上的样子。
能解释一下么?
欢迎光临 光电工程师社区 (http://bbs.oecr.com/)
Powered by Discuz! X3.2