【光学】基于matlab涡旋光与球面波的干涉【含Matlab源码 597期】

本文主要是介绍【光学】基于matlab涡旋光与球面波的干涉【含Matlab源码 597期】，对大家解决编程问题具有一定的参考价值，需要的程序猿们随着小编来一起学习吧！

一、简介

基于matlab涡旋光与球面波的干涉

二、源代码

clear
clc
row=1080;                                              %像素点设置成1080pix
g1=zeros(row);                                         %生成1080阶零矩阵，初始化g1
g2=zeros(row);                                         %生成1080阶零矩阵，初始化g1
w0=100;                                                %束腰半径
l=3;                                                   %拓扑荷值
for m1=1:row                                           %涡旋光函数
for n1=1:row
if (m1-row/2).^2+(n1-row/2).^2<row/2*row/2
g1(n1,m1)=sqrt((m1-row/2)^2+(n1-row/2)^2)^abs(l)*exp(-((m1-row/2)^2+(n1-row/2)^2)/w0^2)*exp(1i*l*atan2((n1-row/2),(m1-row/2))); 
end
end
end
A0=max(max(abs(g1)));                                 %球面波函数
for m1=1:row
for n1=1:row
if (m1-row/2).^2+(n1-row/2).^2<row/2*row/2
g2(n1,m1)=A0.*exp(-((m1-row/2)^2+(n1-row/2)^2)/(row*0.2)^2).*exp(1i*pi*-2*((m1-row/2)^2+(n1-row/2)^2)/(row/6)^2); 
end
end
end

三、运行结果

四、备注

版本：2014a
完整代码或代写加1564658423

这篇关于【光学】基于matlab涡旋光与球面波的干涉【含Matlab源码 597期】的文章就介绍到这儿，希望我们推荐的文章对大家有所帮助，也希望大家多多支持为之网！