仿真
程序员文章站
2022-07-06 12:17:14
...
clc;clear
lax=1.2 : 0.02 : 2;
s1=(1+(2.8939*lax.^2)./(lax.^2-0.13967^2)).^1/2;
% plot(t,Wt,'r-o','markersize',6,'markeredgecolor','r','markerfacecolor','r')
plot(lax,s1,'r')
xlabel('wavelength(μm)')
ylabel('Refractive index')
box off
grid on
在这里插入代码片clc;
clear all;
close all;
clf;
s1=0
lax=1.2 : 0.01 : 2;
b=[0.6961663,0.4079426,0.8974794];
la=[0.0684046,0.1162414,9.896161];
for i=1:3
s1=s1+(b(i)*lax.^2)./(lax.^2-la(i).^2);
end
s1=(1+s1).^1/2;
figure(1);
plot(lax,s1,'b');
xlabel('wavelength(μm)')
ylabel('Refractive index')
clc;clear
lax=1.2 : 0.02 : 2;
la=11.686;
a=0.9398;
b=8.1046*10^-3;
lax1=0.0684046;
laxg=1.1071;
s1=(la+a./lax.^2+(b*lax1^2)./(lax.^2-laxg^2)).^1/2;
% plot(t,Wt,'r-o','markersize',6,'markeredgecolor','r','markerfacecolor','r')
plot(lax,s1,'r')
xlabel('wavelength(μm)')
ylabel('Refractive index')
box off
grid on
推荐阅读
-
按键使数码管循环显示从0到9 (51单片机+汇编语言+Proteus仿真)
-
【虚拟仿真】Unity3D对物体进行拆分实现
-
UG怎么制作不完整的齿轮仿真运动?
-
电磁仿真工具EMCos Studio 2017注册破解安装详细图解教程(附许可文件)
-
UG怎么制作不完整的齿轮仿真运动?
-
SolidWorks怎么制作棘轮棘爪运动仿真?
-
UG NX10.0怎么制作棘轮机构仿真动画?
-
keil uvision2怎么仿真?Keil uVision2进行软件仿真调试的方法教程
-
ActiveSync 与 Pocket PC 2003 仿真器 建立同步图文方法
-
ActiveSync 与 Pocket PC 2003 仿真器 建立同步图文方法