0

功能

您好,我尝试为绘图准备此功能,但它似乎比预期的要困难。我为图像上的三个相应功能编写了以下代码:

u3[r_, \[Phi]_] := BesselJ[r, n]*Exp[I n phi], {r, 0, 0.5}, {\[Phi], 0, 2 \[Pi]}, {n, 0, 5}; 
u4[r_, \[Phi]_] := (BesselJ[3*r, n] + BesselY[3*r, n])*Exp[I n phi], {r, 0.5, 1}, {\[Phi], 0, 2 \[Pi]}, {n, 0, 5};
u5[r_, \[Phi]_] := HankelH1[r, n]*Exp[I n phi], {r, 0.5, 10}, {\[Phi], 0, 2 \[Pi]}, {n, 0, 5};

然后我要创建一个函数 W 将三者相加,然后绘制 W。

但是对于贝塞尔和汉克尔公式,我一遍又一遍地得到一个错误。根据给出的图像,其中 zeta 1 和 2 是常数,这里有什么问题?

任何帮助表示赞赏!

4

0 回答 0