声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 957|回复: 0

[编程技巧] matlab含贝塞尔函数的方程

[复制链接]
发表于 2010-7-4 11:18 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
为什么每次解出来的都是 empty sym

clear all;                             % 清理
clc;
clf;
syms a b arfa m a b u
m=1;
a=90;
b=300;
u=0.3;
H11 =besselj(m,arfa*b);
H12 =besseli(m,arfa*b);
H13 =bessely(m,arfa*b);
H14 =besselk(m,arfa*b);

H21=m/(arfa*b)*besselj(m,arfa*b)-besselj((m+1),arfa*b);
H22=m/(arfa*b)*besseli(m,arfa*b)+besseli((m+1),arfa*b);
H23=m/(arfa*b)*bessely(m,arfa*b)-bessely((m+1),arfa*b);
H24=m/(arfa*b)*besselk(m,arfa*b)-besselk((m+1),arfa*b);

H31 =besselj(m,arfa*a)-(1-u)*(m*(m-1)/(arfa*a)^2*besselj(m,arfa*a)+1/(arfa*a)*besselj((m+1),arfa*a));
H32 =-(besseli(m,arfa*a)+(1-u)*(m*(m-1)/(arfa*a)^2*besseli(m,arfa*a)-1/(arfa*a)*besseli((m+1),arfa*a)));
H33 =bessely(m,arfa*a)-(1-u)*(m*(m-1)/(arfa*a)^2*bessely(m,arfa*a)+1/(arfa*a)*bessely((m+1),arfa*a));
H34 =-(besselk(m,arfa*a)+(1-u)*(m*(m-1)/(arfa*a)^2*besselk(m,arfa*a)+1/(arfa*a)*besselk((m+1),arfa*a)));

H41 =m*besselj(m,arfa*a)-(arfa*a)*besselj((m+1),arfa*a)+m^2*(1-u)/(arfa*a)^2*((m-1)*besselj(m,arfa*a)-(arfa*a)*besselj((m+1),arfa*a));
H42 =-(m*besseli(m,arfa*a)+(arfa*a)*besseli((m+1),arfa*a)-m^2*(1-u)/(arfa*a)^2*((m-1)*besseli(m,arfa*a)+(arfa*a)*besseli((m+1),arfa*a)));
H43 =m*bessely(m,arfa*a)-(arfa*a)*bessely((m+1),arfa*a)+m^2*(1-u)/(arfa*a)^2*((m-1)*bessely(m,arfa*a)-(arfa*a)*bessely((m+1),arfa*a));
H44 =-(m*besselk(m,arfa*a)-(arfa*a)*besselk((m+1),arfa*a)-m^2*(1-u)/(arfa*a)^2*((m-1)*besselk(m,arfa*a)-(arfa*a)*besseli((m+1),arfa*a)));
A=[H11 H12 H13 H14; H21 H22 H23 H24; H31 H32 H33 H34; H41 H42 H43 H44]
A=det(A)
solve(A,arfa)

[ 本帖最后由 hyfang 于 2010-7-4 11:22 编辑 ]
回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-5-28 22:51 , Processed in 0.054380 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表