Mathematica の積分について助けが必要です:
0 と Infinity の間x^(1/4)*BesselJ[-1/4, a*x]*Cos[b*x]のx変数 (aとはパラメーター)の積分を計算する必要があります。b
関数が複雑で解析プリミティブが存在しないのですが、NIntegrateで数値的にやろうとすると収束しませんでした。ただしx^(1/4)*BesselJ[-1/4, a*x]、収束する (実際には解析的に計算できる) ため、もう一方は収束するはずであり、Mathematica の問題は何らかの数値エラーに違いありません。