ICode9

精准搜索请尝试: 精确搜索
首页 > 编程语言> 文章详细

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

2021-06-25 14:02:38  阅读:165  来源: 互联网

标签:球面波 597 g1 1080 涡旋 源码 zeros row


一、简介

基于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

标签:球面波,597,g1,1080,涡旋,源码,zeros,row
来源: https://www.cnblogs.com/homeofmatlab/p/14930602.html

本站声明: 1. iCode9 技术分享网(下文简称本站)提供的所有内容,仅供技术学习、探讨和分享;
2. 关于本站的所有留言、评论、转载及引用,纯属内容发起人的个人观点,与本站观点和立场无关;
3. 关于本站的所有言论和文字,纯属内容发起人的个人观点,与本站观点和立场无关;
4. 本站文章均是网友提供,不完全保证技术分享内容的完整性、准确性、时效性、风险性和版权归属;如您发现该文章侵犯了您的权益,可联系我们第一时间进行删除;
5. 本站为非盈利性的个人网站,所有内容不会用来进行牟利,也不会利用任何形式的广告来间接获益,纯粹是为了广大技术爱好者提供技术内容和技术思想的分享性交流网站。

专注分享技术,共同学习,共同进步。侵权联系[81616952@qq.com]

Copyright (C)ICode9.com, All Rights Reserved.

ICode9版权所有