版塊導(dǎo)航: 正在加載中...

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進(jìn)行實(shí)名認(rèn)證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號(hào)能夠正常使用，請(qǐng)盡快對(duì)帳號(hào)進(jìn)行手機(jī)號(hào)驗(yàn)證，感謝您的理解與支持！

24小時(shí)熱門版塊排行榜

返回列表

jjgy_2002

木蟲(chóng) (著名寫手)

應(yīng)助: 16 (小學(xué)生)
金幣: 1285.3
散金: 1556
紅花: 4
帖子: 1949
在線: 984.6小時(shí)
蟲(chóng)號(hào): 646930
注冊(cè): 2008-11-05
專業(yè): 信號(hào)理論與信號(hào)處理

[求助] [求助] 幫看此第一類貝塞爾函數(shù)求解代碼根據(jù)哪篇文獻(xiàn)的計(jì)算方法編寫？

[求助] 幫看此第一類貝塞爾函數(shù)求解代碼根據(jù)哪篇文獻(xiàn)的計(jì)算方法編寫？
代碼如下：
function Jx = bessel(n,x)
format long;
if n == 0
a = [5.7568490574e10;-1.3362590354e10;6.516196407e8;
      -1.121442418e7;7.739233017e4;-1.849052456e2];
b = [5.7568490411e10;1.029532985e9;9.494680718e6;
      5.927264853e4;2.678532712e2;1.0];
r =[1.0;-0.1098628627e-2;0.2734510407e-4;
      -0.2073370639e-5;0.2093887211e-6];
s =[-0.1562499995e-1;0.1430488765e-3;-0.6911147651e-5;
      0.7621095161e-6;-0.934945152e-7];
if abs(x) < 8
      J0_u = a(1);
      J0_d = b(1);
      for i=2:6
         J0_u = J0_u + a(i)*power(x,2*(i-1));
         J0_d = J0_d + b(i)*power(x,2*(i-1));
      end
      J0 = J0_u/J0_d;
else
      z = 8/abs(x);
      sita = abs(x) - pi/4;
      R0 = r(1);
      S0 = s(1);
      for i=2:5
         R0 = R0 + r(i)*power(z,2*(i-1));
         S0 = S0 + s(i)*power(z,2*(i-1));
      end
      J0 = (R0*cos(sita)-z*S0*sin(sita))*sqrt(2/pi/abs(x));
end
Jx = J0;
else
if n == 1
      c = [7.2362614232e10;-7.895059235e9;2.423968531e8;
         -2.972611439e6;1.570448260e4;-3.016036606e1];
      d = [1.44725228443e11;2.300535178e9;1.858330474e7;
         9.944743994e4;3.769991397e2;1.0];
      p = [1.0;0.183105e-2;-0.3516396496e-4;
         0.2457520174e-5;-0.240337019e-6];
      q = [0.4687499995e-1;-0.2002690873e-3;
         0.8449199096e-5;-0.88228987e-6;
         0.105787412e-6];
      if abs(x) < 8
         J1_u = c(1);
         J1_d = d(1);
         for i=2:6
            J1_u = J1_u + c(i)*power(x,2*(i-1));
            J1_d = J1_d + d(i)*power(x,2*(i-1));
         end
         J1 = x*J1_u/J1_d;
      else
         z = 8/abs(x);
         fi = abs(x) - 3*pi/4;
         P1 = p(1);
         Q1 = q(1);
         for i=2:5
            P1 = P1 + p(i)*power(z,2*(i-1));
            Q1 = Q1 + q(i)*power(z,2*(i-1));
         end
         J1 = (P1*cos(fi)-z*Q1*sin(fi))*sqrt(2/pi/abs(x));
         if x<0
            J1 = -J1;
         end
      end
      Jx = J1;
else
      if abs(x) > n
         y = 2/x;
         bess1 = bessel(0,x);
         bess2 = bessel(1,x);
         for j=1:n-1
            Jx = j*y*bess2 - bess1;
            bess1 = bess2;
            bess2 = Jx;
         end
      else
         M = 2*floor(((n + floor(sqrt(40*n))))/2);
         JS = zeros(M+2 ,1);
         JS(M+2) = 0;
         JS(M+1) = 1;
         y = 2/x;
         bSum = 0;
         for k=M:-1:1
            JS(k) = JS(k+1)*y*k - JS(k+2);
         end
         BK = JS(1);
         for k=1:floor(M/2)
            BK = BK + 2*JS(2*k+1);
         end
         Jx = JS(n+1)/BK;
      end
end
end

回復(fù)此樓

» 猜你喜歡

265求調(diào)劑已經(jīng)有4人回復(fù)
085700資源與環(huán)境308求調(diào)劑已經(jīng)有6人回復(fù)
一志愿吉林大學(xué)材料學(xué)碩321求調(diào)劑已經(jīng)有12人回復(fù)
286分人工智能專業(yè)請(qǐng)求調(diào)劑愿意跨考！已經(jīng)有3人回復(fù)
329求調(diào)劑已經(jīng)有5人回復(fù)
申請(qǐng)回稿延期一個(gè)月，編輯同意了。但系統(tǒng)上的時(shí)間沒(méi)變，給編輯又寫郵件了，沒(méi)回復(fù) 已經(jīng)有4人回復(fù)
材料學(xué)碩318求調(diào)劑已經(jīng)有5人回復(fù)
一志愿中國(guó)海洋大學(xué)，生物學(xué)，301分，求調(diào)劑已經(jīng)有6人回復(fù)
081700化工學(xué)碩調(diào)劑已經(jīng)有3人回復(fù)
一志愿蘇州大學(xué)材料求調(diào)劑，總分315（英一）已經(jīng)有3人回復(fù)

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:

關(guān)于貝塞爾函數(shù)的問(wèn)題已經(jīng)有25人回復(fù)
一個(gè)高一函數(shù)題求解已經(jīng)有7人回復(fù)
不同階第一類貝塞爾函數(shù)的正交性已經(jīng)有11人回復(fù)
【求助】貝塞爾函數(shù)求解已經(jīng)有4人回復(fù)

1樓 2011-06-25 14:16:19

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jjgy_2002

木蟲(chóng) (著名寫手)

2樓2011-06-25 16:52:32

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jjgy_2002

木蟲(chóng) (著名寫手)

應(yīng)助: 16 (小學(xué)生)
金幣: 1285.3
散金: 1556
紅花: 4
帖子: 1949
在線: 984.6小時(shí)
蟲(chóng)號(hào): 646930
注冊(cè): 2008-11-05
專業(yè): 信號(hào)理論與信號(hào)處理

怎沒(méi)人響應(yīng)呢?

回復(fù)此樓

3樓2011-06-27 09:58:13

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

vivian5251

新蟲(chóng) (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 35.3
帖子: 29
在線: 2.7小時(shí)
蟲(chóng)號(hào): 1335737
注冊(cè): 2011-07-02
性別: MM
專業(yè): 信息安全

【答案】應(yīng)助回帖

想幫助,但不會(huì),希望有人能幫到你

贊一下

回復(fù)此樓

大家好

4樓2011-07-03 01:10:06

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

tong_xiao

新蟲(chóng) (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 11
帖子: 3
在線: 3.2小時(shí)
蟲(chóng)號(hào): 2603090
注冊(cè): 2013-08-18
專業(yè): 應(yīng)用數(shù)學(xué)方法

金幣有點(diǎn)少哈

回復(fù)此樓

5樓2013-11-12 21:14:14

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jjgy_2002

木蟲(chóng) (著名寫手)

應(yīng)助: 16 (小學(xué)生)
金幣: 1285.3
散金: 1556
紅花: 4
帖子: 1949
在線: 984.6小時(shí)
蟲(chóng)號(hào): 646930
注冊(cè): 2008-11-05
專業(yè): 信號(hào)理論與信號(hào)處理

引用回帖:

5樓: Originally posted by tong_xiao at 2013-11-12 21:14:14
金幣有點(diǎn)少哈

呵呵，能幫忙嗎？我多給金幣就是了

贊一下

回復(fù)此樓

6樓2013-11-13 13:02:23

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

tong_xiao

新蟲(chóng) (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 11
帖子: 3
在線: 3.2小時(shí)
蟲(chóng)號(hào): 2603090
注冊(cè): 2013-08-18
專業(yè): 應(yīng)用數(shù)學(xué)方法

引用回帖:

6樓: Originally posted by jjgy_2002 at 2013-11-13 13:02:23
呵呵，能幫忙嗎？我多給金幣就是了

...

我在一本書(shū)上看到過(guò)Vb編程的，可以嗎？

贊一下

回復(fù)此樓

7樓2013-11-19 21:03:13

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

tong_xiao

新蟲(chóng) (初入文壇)

應(yīng)助: 0 (幼兒園)
金幣: 11
帖子: 3
在線: 3.2小時(shí)
蟲(chóng)號(hào): 2603090
注冊(cè): 2013-08-18
專業(yè): 應(yīng)用數(shù)學(xué)方法

就是一個(gè)visual basic 常用算法集里面有一個(gè)此種算法，不過(guò)是vb，跟你的matlab大同小異哦

贊一下

回復(fù)此樓

8樓2013-11-19 21:06:47

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jjgy_2002

木蟲(chóng) (著名寫手)

應(yīng)助: 16 (小學(xué)生)
金幣: 1285.3
散金: 1556
紅花: 4
帖子: 1949
在線: 984.6小時(shí)
蟲(chóng)號(hào): 646930
注冊(cè): 2008-11-05
專業(yè): 信號(hào)理論與信號(hào)處理

引用回帖:

7樓: Originally posted by tong_xiao at 2013-11-19 21:03:13
我在一本書(shū)上看到過(guò)Vb編程的，可以嗎？...

可以啊

回復(fù)此樓

9樓2013-11-20 15:51:13

已閱回復(fù)此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 jjgy_2002 的主題更新

返回列表

普通表情龍兔虎貓

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 288求調(diào)劑 +15	于海海海海 2026-03-19	15/750	2026-03-19 22:41 by 學(xué)員8dgXkO
[考研] 0703化學(xué)調(diào)劑，六級(jí)已過(guò)，有科研經(jīng)歷 +12	曦熙兮 2026-03-15	12/600	2026-03-19 19:42 by maocaozhuxi
[考研] 0703化學(xué)調(diào)劑 +4	18889395102 2026-03-18	4/200	2026-03-19 16:13 by 30660438
[考研] 317求調(diào)劑 +3	申子申申 2026-03-19	6/300	2026-03-19 14:16 by 申子申申
[考研] 一志愿西北大學(xué) ，070300化學(xué)學(xué)碩，總分287，雙非一本，求調(diào)劑。 +3	晨昏線與星海 2026-03-19	3/150	2026-03-19 13:36 by houyaoxu
[考研] 281求調(diào)劑（0805） +9	煙汐憶海 2026-03-16	19/950	2026-03-19 11:42 by laoshidan
[考研] 本科鄭州大學(xué)物理學(xué)院，一志愿華科070200學(xué)碩，346求調(diào)劑 +4	我不是一根蔥 2026-03-18	4/200	2026-03-19 09:11 by 浮云166
[考研] 0703化學(xué) 305求調(diào)劑 +4	FY_yy 2026-03-14	4/200	2026-03-19 05:54 by anny19840123
[考研] 材料工程專碩調(diào)劑 +5	204818@lcx 2026-03-17	6/300	2026-03-18 22:55 by 204818@lcx
[考研] 0854可跨調(diào)劑，一作一項(xiàng)核心論文五項(xiàng)專利，省、國(guó)級(jí)證書(shū)40+數(shù)一英一287 +8	小李0854 2026-03-16	8/400	2026-03-18 14:35 by 搏擊518
[考研] 收復(fù)試調(diào)劑生 +4	雨后秋荷 2026-03-18	4/200	2026-03-18 14:16 by elevennnne
[考研] 331求調(diào)劑（0703有機(jī)化學(xué) +7	ZY-05 2026-03-13	8/400	2026-03-18 14:13 by 007_lilei
[考博] 26申博 +4	八6八68 2026-03-16	4/200	2026-03-17 13:00 by 輕松不少隨
[論文投稿] 有沒(méi)有大佬發(fā)小論文能帶我個(gè)二作 +3	增銳漏人 2026-03-17	4/200	2026-03-17 09:26 by xs74101122
[考研] 326求調(diào)劑 +4	諾貝爾化學(xué)獎(jiǎng)覬?/a> 2026-03-15	7/350	2026-03-16 17:11 by 諾貝爾化學(xué)獎(jiǎng)覬?/a>
[考研] 304求調(diào)劑 +5	素年祭語(yǔ) 2026-03-15	5/250	2026-03-16 17:00 by 我的船我的海
[考研] 288求調(diào)劑 +4	奇點(diǎn)0314 2026-03-14	4/200	2026-03-14 23:04 by JourneyLucky
[考研] 080500，材料學(xué)碩302分求調(diào)劑學(xué)校 +4	初識(shí)可樂(lè) 2026-03-14	5/250	2026-03-14 21:08 by peike
[考研] 中科大材料與化工319求調(diào)劑 +3	孟鑫材料 2026-03-14	3/150	2026-03-14 20:10 by ms629
[考研] 中科大材料專碩319求調(diào)劑 +3	孟鑫材料 2026-03-13	3/150	2026-03-14 18:10 by houyaoxu

<small id="wos6k"></small>

24小時(shí)熱門版塊排行榜

[求助] [求助] 幫看此第一類貝塞爾函數(shù)求解代碼根據(jù)哪篇文獻(xiàn)的計(jì)算方法編寫？

» 猜你喜歡

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:

【答案】應(yīng)助回帖

[求助] [求助] 幫看此第一類貝塞爾函數(shù)求解代碼根據(jù)哪篇文獻(xiàn)的計(jì)算方法編寫？

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助: