24小时热门版块排行榜    

查看: 1669  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

黑gray白

铜虫 (小有名气)

[求助] 紧急求助!!用MATLAB/mathematics求解色散方程已有1人参与


其中是光波圆频率,是波长,其范围是600nm到1200nm,每一纳米取一个值,c取3e8,d=50nm,



j是虚数单位,最后求的就是波长与有效折射率实部的关系!谢谢大神!!!
回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

cchenhao

新虫 (初入文坛)

5楼2018-05-25 20:03:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

谢学江

新虫 (初入文坛)

你好,请问你做出来了吗,我也刚开始学,不会啊
4楼2015-11-21 09:47:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

独孤神宇

版主 (知名作家)

【答案】应助回帖

引用回帖:
5楼: Originally posted by cchenhao at 2018-05-25 20:03:35
接触来了吗

function neff = sesan(lambd)
%lambd=600:1:1200;
c=3e8;
d=50;
ed=1;
wp=9.1;
gamma=0.018;
w=2*pi*c./lambd;
em=3.7-wp^2./(w.^2+1i*w*gamma);
eq=@(neff)em.*sqrt(neff.^2-ed).*tanh(d*pi*sqrt(neff.^2-ed)./lambd)+ed*sqrt(neff.^2-em);
neff=fzero(eq,1e-10); %% 初始值可根据经验值设置
end

%%*****

clear;
lambd=600:100:1200;%%步长
neff=zeros(size(lambd));
for i=1:length(lambd)
neff(i)=sesan(lambd(i));
end
plot(lambd,neff)
数值计算
6楼2018-05-25 23:04:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见