【光学】基于Matlab实现双缝干涉实验和牛顿环的实验

✅作者简介：热爱科研的Matlab仿真开发者，修心和技术同步精进，matlab项目合作可私信。

🍎个人主页：Matlab科研工作室

🍊个人信条：格物致知。

更多Matlab仿真内容点击👇

智能优化算法  神经网络预测 雷达通信  无线传感器

信号处理 图像处理 路径规划 元胞自动机 无人机

⛄ 内容介绍

本文运用Matlab软件仿真模拟了牛顿环干涉图像及其光强分布曲线,然后通过动态调整图像的视野来确定凸透镜的曲率半径.实现光学双缝干涉的计算机仿真.仿真结果对学生理解光学原理的基本概念很有帮助,提高了教学效果.该仿真图像细致逼真,直观形象,测量结果准确,为光学仿真软件的开发提供了新的,有效的途径.

⛄ 部分代码

close all;

clear; clc;

% 生成图片

hmain=figure;

set(gcf,'menubar','none','numbertitle','off','name',...

    '基于GUI的电磁波干涉实现方法研究','unit','normalized');

% 定义字体大小

fs1=16;

fs2=20;

% 标注

h_radio1=uicontrol('style','radio','unit','normalized','Position',...

    [0.32 0.8 0.34 0.07],'fontsize',fs1,'string','杨氏双缝干涉现象',...

    'callback',['set(h_radio2,''value'',0)']);

set(h_radio1,'value',1);

h_radio2=uicontrol('style','radio','unit','normalized','Position',...

    [0.32 0.7 0.34 0.07],'fontsize',fs1,'string','牛顿环干涉现象',...

    'callback',['set(h_radio1,''value'',0)']);

h_push1=uicontrol('style','push','unit','normalized','position',[0.30,0.45,0.12,0.10],...

    'fontsize',fs2,'string','进入','callback',['if get(h_radio1,''value''), Yang_interface;'...

    'elseif get(h_radio2,''value''), Newton_interface; end']);

h_push2=uicontrol('style','push','unit','normalized','position',[0.60,0.45,0.12,0.10],...

    'fontsize',fs2,'string','退出','callback','close');

⛄ 运行结果

⛄ 参考文献

[1]赵鑫. 基于Matlab的光学双缝干涉实验仿真[J]. 科学中国人, 2015(12Z):1.

[2]赵华芬, 孔德明, 徐富新,等. 基于Matlab的牛顿环实验仿真模拟[C]// 2011年全国高等学校物理基础课程教育学术研讨会. 2011.

❤️ 关注我领取海量matlab电子书和数学建模资料

❤️部分理论引用网络文献，若有侵权联系博主删除