2.5 Mathematica

Mathematica では BesselJ[$n$ ,x] で、 $n$ 次の Bessel 関数 $J_n$ が計算できる。

グラフを描く

g1=Plot[BesselJ[0,x],{x,0,10}]
g2=Plot[Evaluate[Table[BesselJ[n, x], {n, 0, 10}]],{x,0,10}]

のようにしてグラフが描ける³。