24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1800  |  回复: 11
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

watertxf

管理员

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

[求助] 求帮忙,关于含有bessel函数的方程的编程求解问题

我现在有个含有贝塞尔函数的方程,方程只有一个未知数k,我需要求方程等于0时k随l的变化。我编的程序如下,请各位高手帮忙看下哪里出了问题,非常感谢!
ps:附件是要求的方程及所用到的关系式
a=0.01159;
b=0.02317;
e=10;
l=7;
syms k
jleka=((pi/(2*e^0.5*k*a))^0.5)*besselj(l+0.5,e^0.5*k*a);
jlka=((pi/(2*k*a))^0.5)*besselj(l+0.5,k*a);
jlkb=((pi/(2*k*b))^0.5)*besselj(l+0.5,k*b);
jldka=0.5*jlka+(k*a*pi/8)^0.5*(besselj(l-0.5,k*a)-besselj(l+1.5,k*a));
jldeka=0.5*jleka+(e^0.5*k*a*pi/8)^0.5*(besselj(l-0.5,e^0.5*k*a)-besselj(l+1.5,e^0.5*k*a));
ylka=((pi/(2*k*a))^0.5)*bessely(l+0.5,k*a);
ylkb=((pi/(2*k*b))^0.5)*bessely(l+0.5,k*b);
yldka=0.5*ylka+(k*a*pi/8)^0.5*(bessely(l-0.5,k*a)-bessely(l+1.5,k*a));
h11=jleka;
h12=jlka/jlkb-ylka/ylkb;
h21=jldeka;
h22=jldka/jlkb-yldka/ylkb;
y=h11*h22-h12*h21;
k=solve(y)
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

watertxf

专家顾问

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

引用回帖:
Originally posted by fengsj9898 at 2011-07-14 11:57:37:
ki=0:0.1:1;
nki=length(k);
yi=zeros(nki,1);
for i=1:nk
k=ki(i);
jleka=((pi/(2*e^0.5*k*a))^0.5)*besselj(l+0.5,e^0.5*k*a);
jlka=((pi/(2*k*a))^0.5)*besselj(l+0.5,k*a);
jlkb=((pi/(2*k*b))^0.5)*b ...

就是说最后算出来的结果不能确定哪个是零点
5楼2011-07-14 14:38:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 12 个回答

fengsj9898

无虫

【答案】应助回帖

★ ★
xzhdty(金币+2): 欢迎常来程序语言看看 2011-07-14 15:41:58
watertxf(金币+5): 您好!能不能麻烦您在跟我详细说一下? 2011-07-15 14:07:49
ki=0:0.1:1;
nki=length(k);
yi=zeros(nki,1);
for i=1:nk
k=ki(i);
jleka=((pi/(2*e^0.5*k*a))^0.5)*besselj(l+0.5,e^0.5*k*a);
jlka=((pi/(2*k*a))^0.5)*besselj(l+0.5,k*a);
jlkb=((pi/(2*k*b))^0.5)*besselj(l+0.5,k*b);
jldka=0.5*jlka+(k*a*pi/8)^0.5*(besselj(l-0.5,k*a)-besselj(l+1.5,k*a));
jldeka=0.5*jleka+(e^0.5*k*a*pi/8)^0.5*(besselj(l-0.5,e^0.5*k*a)-besselj(l+1.5,e^0.5*k*a));
ylka=((pi/(2*k*a))^0.5)*bessely(l+0.5,k*a);
ylkb=((pi/(2*k*b))^0.5)*bessely(l+0.5,k*b);
yldka=0.5*ylka+(k*a*pi/8)^0.5*(bessely(l-0.5,k*a)-bessely(l+1.5,k*a));
h11=jleka;
h12=jlka/jlkb-ylka/ylkb;
h21=jldeka;
h22=jldka/jlkb-yldka/ylkb;
y=h11*h22-h12*h21;
yi(i)=y;
end
2楼2011-07-14 11:57:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

watertxf

管理员

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!


dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-18 22:56:55
引用回帖:
Originally posted by fengsj9898 at 2011-07-14 11:57:37:
ki=0:0.1:1;
nki=length(k);
yi=zeros(nki,1);
for i=1:nk
k=ki(i);
jleka=((pi/(2*e^0.5*k*a))^0.5)*besselj(l+0.5,e^0.5*k*a);
jlka=((pi/(2*k*a))^0.5)*besselj(l+0.5,k*a);
jlkb=((pi/(2*k*b))^0.5)*b ...

这位老师,非常感谢您的回帖。但是我还是看不太明白,能麻烦您给详细说一下吗?我需要求方程等于零时整数L对应的k,太谢谢您了!
4楼2011-07-14 14:20:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

watertxf

管理员

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

jjdg: 直接pm会更快获得答复 2011-07-14 20:14:15
引用回帖:
Originally posted by watertxf at 2011-07-14 14:20:49:
这位老师,非常感谢您的回帖。但是我还是看不太明白,能麻烦您给详细说一下吗?我需要求方程等于零时整数L对应的k,太谢谢您了!

还有我是用的matlab编的程序
6楼2011-07-14 14:40:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿天津大学339材料与化工求调剂 +4 江往卖鱼 2026-03-26 4/200 2026-04-01 09:25 by oooqiao
[考研] 一志愿华南师范361分,化学求调剂 +3 Nicole88888 2026-04-01 3/150 2026-04-01 09:25 by wxiongid
[考研] 350求调剂 +6 阿佳~ 2026-03-31 6/300 2026-04-01 08:49 by 不吃魚的貓
[考研] 289求调剂 +7 BrightLL 2026-03-29 7/350 2026-03-31 22:05 by 544594351
[考研] 省双一流重点一本大学招收调剂 +3 wwwwffffff 2026-03-31 5/250 2026-03-31 19:49 by 曾曾曾!
[考研] 085600 材料与化工 329分求调剂 +20 Mr. Z 2026-03-25 21/1050 2026-03-31 16:53 by Zzxxxs
[考研] 086000生物与医药 初试274求调剂 +4 小叮当来了 2026-03-30 4/200 2026-03-31 16:48 by shengliu165
[考研] 材料与化工272求调剂 +25 阿斯蒂芬2004 2026-03-28 25/1250 2026-03-31 16:27 by hypershenger
[考研] 生物学 296 求调剂 +7 朵朵- 2026-03-26 9/450 2026-03-31 14:26 by jp9609
[考研] 08工科,295,接受跨专业调剂 +6 lmnlzy 2026-03-30 6/300 2026-03-31 10:04 by cal0306
[考研] 085601一志愿中山大学深圳材料工程330求调剂 +5 pipiver 2026-03-30 5/250 2026-03-31 07:37 by JourneyLucky
[考研] 083000环境科学与工程调剂,总分281 +4 橙子(胜意) 2026-03-30 4/200 2026-03-31 00:44 by Linzejun
[考研] 一志愿北京化工大学材料与化工(085600)296求调剂 +25 稻妻小编 2026-03-26 25/1250 2026-03-30 20:11 by 滴滴上岸呀
[考研] 材料化工340求调剂 +3 jhx777 2026-03-30 3/150 2026-03-30 17:54 by JourneyLucky
[考研] 一志愿北京工业大学,324分求调剂 +6 零八# 2026-03-28 6/300 2026-03-29 21:20 by nanaliuyun
[考研] 298求调剂 +4 种圣赐 2026-03-28 4/200 2026-03-29 08:42 by q1092522407
[考研] 305求调剂 +8 RuiFairyrui 2026-03-28 8/400 2026-03-29 08:22 by fmesaito
[考研] 求调剂 +4 零八# 2026-03-27 4/200 2026-03-27 18:07 by yu221
[考研] 272求调剂 +7 脚滑的守法公民 2026-03-27 7/350 2026-03-27 17:23 by laoshidan
[考研] 321求调剂 +6 wasdssaa 2026-03-26 6/300 2026-03-26 20:57 by sanrepian
信息提示
请填处理意见