大家好,欢迎来到IT知识分享网。
主程序:
clc
clear
w=0:0.1:12;
y0=Besselj(0,w);
y1=Besselj(1,w);
y2=Besselj(2,w);
plot(w,y0,’o-‘,w,y1,’*-‘,w,y2,’s-‘);
legend(‘besl0′,’besl1′,’besl2’);
grid on;
title(‘0阶、1阶、2阶第一类贝塞尔函数曲线图’); xlabel(‘Variable X’);
ylabel(‘Variable Y’);
axis([0,12,-0.6,1]);
y00=bessely(0,w);
y11=bessely(1,w);
y22=bessely(2,w);
figure;
plot(w,y00,’o-‘,w,y11,’*-‘,w,y22,’s-‘);
legend(‘besl00′,’besl11′,’besl22’);grid on;
axis([0,12,-1,0.8]);
title(‘0阶、1阶、2阶第二类贝塞尔函数曲线图’); xlabel(‘Variable X’);
ylabel(‘Variable Y’);
d0=besseld(0,w );
d1=besseld(1,w );
d2=besseld(2,w );
figure;
plot(w,d0,’o-‘,w,d1,’*-‘,w,d2,’s-‘);
legend(‘0阶导’,’1阶导’,’2阶导’);grid on;
title(‘0阶、1阶、2阶第一类贝塞尔函数导数曲线图’); xlabel(‘Variable X’);
ylabel(‘Variable Y’);
axis([0 12 -0.8 0.8]);
求第一类贝塞尔函数导数的程序:
function [ y ] =besseld(n,x )
if n==0
y=-Besselj(1,x);
else
y=(Besselj(n-1,x)-Besselj(n+1,x))/2;
end
end
免责声明:本站所有文章内容,图片,视频等均是来源于用户投稿和互联网及文摘转载整编而成,不代表本站观点,不承担相关法律责任。其著作权各归其原作者或其出版社所有。如发现本站有涉嫌抄袭侵权/违法违规的内容,侵犯到您的权益,请在线联系站长,一经查实,本站将立刻删除。 本文来自网络,若有侵权,请联系删除,如若转载,请注明出处:https://yundeesoft.com/15689.html