
Q1:
Mathematica Bessel J的根 (小數後16位) 我想找Bessel J =0 時 的根 例如 J01=2.4048 J11=3.8317 我要找到小數點後16位 請給我程式 主要以Mathematica 程式為主!
Ans: N[BesselJZero[#, 1], 16] & /@ Range[0, 10]//TableForm

Q2 : 請問它內建BesselJZero[ ], 他的計算方法是什麼嗎? 也是Inverse 過去嗎?
Ans: 這個Wolfram不會讓我們知道他是怎麼做的,所以我也不知道。應該會是跟教科書上寫的一樣吧!
Q3. 使用N[BesselJZero[0, 5],16], 還是一樣只出現小數點後五位, 是不是我哪用錯了?
小數點後5位,是mathematica預設的顯示位數。如果要顯示更精確的數字,那要搭配N,N[運算是, 位數]。我用的是7.0。不過你可以找找help裡面的BesselJZero,裡面有個範例是

InputForm[N[BesselJZero[#, 1], 20] & /@ Range[0, 10], NumberMarks -> False]

讀者回應 ( 0 意見 )
訂閱發佈留言 (Atom)
發佈留言
Please leave your name and tell me what you thought about this site. Comments, suggestions and views are welcomed.
如果這篇文章對你有幫助,那請留個訊息給我~