✅作者简介：热爱科研的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.
