✅作者简介:热爱科研的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');