声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 995|回复: 0

[绘图技巧] 请教1阶贝塞尔函数绘图的问题

[复制链接]
发表于 2009-5-21 17:37 | 显示全部楼层 |阅读模式

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

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

x
我自己完成的部分代码求出1阶贝塞尔函数的根,关于后面的部分不知如何进行下去为好,请指点一下
clear all; maxv=2; maxs=10;
theta=linspace(0,2*pi,100); t=0.4;
[r]=root_bes(maxv,maxs); 求bessel1阶函数的根


function [r]=root_bes(maxv,maxs)
r= zeros(maxv-1, maxs); incr = 4.0;
for v=maxv-1
    h = v+1.9*v^(1/3)+1;
    if (v==0)
        r(v+1,1) = fzero(@(x)besselj(v,x),2);
    else
        r(v+1,1) = fzero(@(x)besselj(v,x),h);
    end
    for s=2:maxs
        r(v+1,s) = fzero(@(x)besselj(v,x),r(v+1,s-1)+incr);
    end   
end
r

[ 本帖最后由 ChaChing 于 2010-3-30 21:25 编辑 ]
偏微分方程.png
回复
分享到:

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-14 17:48 , Processed in 0.078425 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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