24小时热门版块排行榜    

查看: 1048  |  回复: 10

jackson316

铜虫 (初入文坛)

[求助] 求助画图

初学mathematica ,希望大家帮帮画一下一个方程的图像。非常感谢。
方程 : 2^(1/2)*(kx+ky)/E*Dn(z)=E*D(n-1)(z)

Dn(z)是ParabolicCylinderD函数
n=E^2/2
Z=2^(1/2)*ky
kx=(ky^2-E^2)^(1/2)

需要画出ky 和E的关系图像。
ky 的范围[-3,1]
E的范围[-3,3]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖置顶 ( 共有1个 )

xiaoqing8569

铁杆木虫 (著名写手)

奥林匹亚光学院院长

jackson316: 回帖置顶 2013-10-23 11:04:02
引用回帖:
4楼: Originally posted by jackson316 at 2013-10-22 11:48:25
再想请教一下,matbal能否调用ParabolicCylinderD呢?如何调用?谢谢。...

一般用mathematica,对matlab不了解。
   MMTC一般情况下都可以搞定。
5楼2013-10-22 14:27:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

xiaoqing8569

铁杆木虫 (著名写手)

奥林匹亚光学院院长

【答案】应助回帖

感谢参与,应助指数 +1
n = e^2/2;
z = 2^(1/2)*ky;
kx = (ky^2 - e^2)^(1/2);
ContourPlot[
2^(1/2)*(kx + ky)/e*ParabolicCylinderD[n, z] ==
  e*ParabolicCylinderD[n - 1, z], {ky, -3, 1}, {e, -3, 3}]
2楼2013-10-19 21:40:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

jackson316

铜虫 (初入文坛)

送红花一朵
非常感谢,为画出图形了。
3楼2013-10-20 22:29:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackson316

铜虫 (初入文坛)

引用回帖:
2楼: Originally posted by xiaoqing8569 at 2013-10-19 21:40:17
n = e^2/2;
z = 2^(1/2)*ky;
kx = (ky^2 - e^2)^(1/2);
ContourPlot

再想请教一下,matbal能否调用ParabolicCylinderD呢?如何调用?谢谢。
4楼2013-10-22 11:48:25
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackson316

铜虫 (初入文坛)

谢谢。
6楼2013-10-22 18:45:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackson316

铜虫 (初入文坛)

请问一下,有谁知道matlab如何调用韦伯函数ParabolicCylinderD?还希望大家指教。
7楼2013-10-22 18:53:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackson316

铜虫 (初入文坛)

引用回帖:
5楼: Originally posted by xiaoqing8569 at 2013-10-22 14:27:44
一般用mathematica,对matlab不了解。
   MMTC一般情况下都可以搞定。...

呵呵。还有个问题还得麻烦一下。最近急用来不及学mathematica.
参量表达式:
d=1;q1=ky-d/2;q2=ky+d/2;
E^2=kx^2+q1^2;  p=E^2/2;
kx1=sqrt(E^2-q2^2);
alpha1=exp(-i*kx*d/2);alpha2=exp(i*kx*d/2);
alpha3=D(p-1,2^(1/2)*q1);alpha4=D(p-1,-2^(1/2)*q1);
r1=(i*2^(1/2)/E)*D(p,2^(1/2)*q1);r2=(i*2^(1/2)/E)*D(p,-2^(1/2)*q1);
r3=exp(i*kx1*d/2);
w1=D(p-1,2^(1/2)*q2);w2=D(p-1,-2^(1/2)*q2);
n1=(i*2^(1/2)/E)*D(p,2^(1/2)*q2);n2=(i*2^(1/2)/E)*D(p,-2^(1/2)*q2);
phi1=arctan(q1/kx); phi2=arctan(q2/kx1);

f1=n2+w2*exp(i*phi2); f2=n1-w1*exp(i*phi2);
g1=r1+alpha3*exp(-i*phi1);g2=r2+alpha4(-i*phi1);

t=2*(n2*w1+n1*w2)*alpha1*cos(phi1)/(r3*(f1*g1-f2*g2));
T=kx1/kx*|t|^2;

要画出T以kx,ky为变量的三维等高图。kx=0:2;  ky=-2:2;

非常感谢你的帮忙!
8楼2013-10-23 10:43:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xiaoqing8569

铁杆木虫 (著名写手)

奥林匹亚光学院院长

引用回帖:
8楼: Originally posted by jackson316 at 2013-10-23 10:43:40
呵呵。还有个问题还得麻烦一下。最近急用来不及学mathematica.
参量表达式:
d=1;q1=ky-d/2;q2=ky+d/2;
E^2=kx^2+q1^2;  p=E^2/2;
kx1=sqrt(E^2-q2^2);
alpha1=exp(-i*kx*d/2);alpha2=exp(i*kx*d/2);
alpha3 ...

D(p,2^(1/2)*q2)
这种D函数是什么意思?
9楼2013-10-23 15:12:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jackson316

铜虫 (初入文坛)

引用回帖:
9楼: Originally posted by xiaoqing8569 at 2013-10-23 15:12:21
D(p,2^(1/2)*q2)
这种D函数是什么意思?...

就是ParabolicCylinderD[n, z]
n=p;
z=sqrt(2)*q2;
10楼2013-10-23 15:16:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jackson316 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:39 by 9i7PCSZyMzot
[论文投稿] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:27 by 9i7PCSZyMzot
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:15 by 9i7PCSZyMzot
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 01:03 by 9i7PCSZyMzot
[论文投稿] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 E4V9bALS54sj 2026-09-19 3/150 2026-09-20 00:51 by 9i7PCSZyMzot
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 4pRyVGCVerAA 2026-09-19 3/150 2026-09-20 00:15 by 9i7PCSZyMzot
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 4pRyVGCVerAA 2026-09-19 3/150 2026-09-20 00:03 by 9i7PCSZyMzot
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 4pRyVGCVerAA 2026-09-19 4/200 2026-09-20 00:03 by 9i7PCSZyMzot
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:51 by 9i7PCSZyMzot
[基金申请] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:39 by 9i7PCSZyMzot
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:27 by 9i7PCSZyMzot
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:27 by 9i7PCSZyMzot
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:03 by 9i7PCSZyMzot
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 4pRyVGCVerAA 2026-09-19 4/200 2026-09-19 23:03 by 9i7PCSZyMzot
[教师之家] 现代”学阀”该如何界定 +3 iaeyuan 2026-09-19 3/150 2026-09-19 20:52 by 没昵称呀
[基金申请] 国社科系统bug了,是不是要放榜了? +7 kynobel 2026-09-16 9/450 2026-09-19 14:52 by 接好运婷
[考博] 申博发邮件 +8 Lmengk 2026-09-15 9/450 2026-09-19 09:27 by 中间体超市
[有机交流] 各位大神,目前国内有哪些比较好用的逆合成软件? 20+3 zapen 2026-09-15 9/450 2026-09-18 18:17 by zapen
[考博] 上海工程技术大学激光智能制造课题组|2027级博士研究生招生公告 +7 水士口 2026-09-16 8/400 2026-09-16 13:47 by kkklens
[考博] 上海工程技术大学激光智能制造课题组招收博士研究生 +8 两三岁ss 2026-09-14 8/400 2026-09-16 09:46 by 水士口
信息提示
请填处理意见