| 查看: 2282 | 回复: 27 | |||
[求助]
金属狭缝内的有效折射率的方程求解
|
不知道matlab大神能不能帮我解一下这个方程，我之前找同学帮忙，结果他说这个方程除非化简成y=ax的形式他才能解，但是这个方程既有复数，又有双曲函数，完全不会接，就想看看有没有大神能直接摆那个程序接一下，金币不够你说，我在加到你满意 其中k0,介电常数都是给定的，主要想看一看有效折射率n，随缝宽w的变化。  有效折射率方程2.jpg |
回复此楼» 猜你喜欢
售SCI一区T0P文章，我:8O.55.1.O.54,科目全,可伽急
已经有14人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有19人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有24人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有11人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有5人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有4人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有4人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有5人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有10人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 分析化学下册答案
已经有39人回复
2楼2013-07-15 10:39:31
3楼2013-07-15 10:46:32
4楼2013-07-15 10:53:23
月只蓝
主管区长 (职业作家)
-
专家经验: +1059 - 应助: 1712 (讲师)
- 贵宾: 8.888
- 金币: 68181.7
- 散金: 1938
- 红花: 443
- 沙发: 4
- 帖子: 4373
- 在线: 3292.4小时
- 虫号: 1122189
- 注册: 2010-10-14
- 专业: 宇宙学
- 管辖: 计算模拟区
5楼2013-07-15 10:56:58
6楼2013-07-15 11:18:47
7楼2013-07-15 11:19:34
【答案】应助回帖
感谢参与，应助指数 +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
9楼2013-07-15 12:05:57
10楼2013-07-15 12:18:05
50