| 查看: 1900 | 回复: 27 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
[求助]
金属狭缝内的有效折射率的方程求解
|
|||
不知道matlab大神能不能帮我解一下这个方程,我之前找同学帮忙,结果他说这个方程除非化简成y=ax的形式他才能解,但是这个方程既有复数,又有双曲函数,完全不会接,就想看看有没有大神能直接摆那个程序接一下,金币不够你说,我在加到你满意![]() 其中k0,介电常数都是给定的,主要想看一看有效折射率n,随缝宽w的变化。 有效折射率方程2.jpg |
» 猜你喜欢
拟解决的关键科学问题还要不要写
已经有10人回复
救命帖
已经有5人回复
限项规定
已经有5人回复
为什么nbs上溴 没有产物点出现呢
已经有9人回复
招博士
已经有3人回复
存款400万可以在学校里躺平吗
已经有35人回复
最失望的一年
已经有18人回复
求推荐博导
已经有4人回复
求推荐英文EI期刊
已经有5人回复
疑惑?
已经有5人回复
» 本主题相关价值贴推荐,对您同样有帮助:
分析化学下册答案
已经有39人回复

【答案】应助回帖
感谢参与,应助指数 +1
|
clear all clc clf k0=6.082e6; ed=1;%空气介电常数εd=1 em=-42.7616+(-1.308i);%金属介电常数ε_m =-42.7616+(-1.308i) w=10^(-9)*(0:0.1:100); n=-100:0.1:100; [w,n]=meshgrid(w,n); A=real(tanh(w*k0.*sqrt(n.^2-ed)/2)+ed.*sqrt(n.^2-em)/em./sqrt(n.^2-ed)); %等式两边相减得A i=find(abs(A)<0.01);%找出A接近0的值时的位置,精确度0.01可自调 plot(w(i),n(i))%画出对应w、n的图像,即为式的解 |

8楼2013-07-15 12:01:35

2楼2013-07-15 10:39:31

3楼2013-07-15 10:46:32

4楼2013-07-15 10:53:23














回复此楼