|
青青子衿
发表于 2019-6-2 18:40
本帖最后由 青青子衿 于 2019-6-3 19:21 编辑 回复 3# 战巡
\begin{align*}
g(a,x)&=\dfrac{\arctan\left(a\,x^4\right)}{1+x^4}\\
G(a)&=\int_0^{+\infty}\dfrac{\arctan\left(a\,x^4\right)}{1+x^4}\mathrm{d}x=\int_0^{+\infty}g(a,x)\mathrm{d}x\\
\dfrac{\partial}{\partial\,\!a}g(a,x)&=\dfrac{\partial}{\partial\,\!a}\dfrac{\arctan\left(a\,x^4\right)}{1+x^4}=\dfrac{x^4}{\left(1+x^4\right)\left(1+a^2x^8\right)}\\
&=\dfrac{a^2x^4+1}{\left(1+a^2\right)\left(1+a^2x^8\right)}-\dfrac{1}{\left(1+a^2\right)\left(1+x^4\right)}\\
g(a,x)&=\dfrac{\arctan\left(a\,x^4\right)}{1+x^4}=\int_0^a\dfrac{x^4}{\left(1+x^4\right)\left(1+t^2x^8\right)}\mathrm{d}t\\
&=\int_0^a\dfrac{t^2x^4+1}{\left(1+t^2\right)\left(1+t^2x^8\right)}\mathrm{d}t-\int_0^a\dfrac{1}{\left(1+x^4\right)\left(1+t^2\right)}\mathrm{d}t\\
\end{align*}
\begin{align*}
G(a)&=\int_0^{+\infty}\dfrac{\arctan\left(a\,x^4\right)}{1+x^4}\mathrm{d}x=\int_0^{+\infty}g(a,x)\mathrm{d}x\\
&=\int_0^{+\infty}\mathrm{d}x\int_0^a\dfrac{x^4}{\left(1+x^4\right)\left(1+t^2x^8\right)}\mathrm{d}t=\int_0^a\mathrm{d}t\int_0^{+\infty}\dfrac{x^4}{\left(1+x^4\right)\left(1+t^2x^8\right)}\mathrm{d}x\\
&=\int_0^a\mathrm{d}t\int_0^{+\infty}\dfrac{t^2x^4+1}{\left(1+t^2\right)\left(1+t^2x^8\right)}\mathrm{d}x-\int_0^a\mathrm{d}t\int_0^{+\infty}\dfrac{1}{\left(1+x^4\right)\left(1+t^2\right)}\mathrm{d}x\\
&=\int_0^a\mathrm{d}t\int_0^{+\infty}\dfrac{t\,u^4+1}{\left(1+t^2\right)\left(1+u^8\right)\sqrt[4]{\,t\,}}\mathrm{d}u-\int_0^a\dfrac{1}{1+t^2}\mathrm{d}t\int_0^{+\infty}\dfrac{1}{1+x^4}\mathrm{d}x\\
&=\dfrac{\pi}{8}\int_0^a\dfrac{\,t\cdot\sqrt{2\sqrt{2}\left(\sqrt{2}-1\right)}+\sqrt{2\sqrt{2}\left(\sqrt{2}+1\right)}}{\left(1+t^2\right)\sqrt[4]{\,t\,}}\mathrm{d}t-\dfrac{\pi}{2\sqrt{2}}\arctan\left(a\right)\\
&=\dfrac{\pi}{8}\int_0^a\dfrac{\,t\,\sec\left(\dfrac{\pi}{8}\right)+\csc\left(\dfrac{\pi}{8}\right)}{\left(1+t^2\right)\sqrt[4]{\,t\,}}\mathrm{d}t-\dfrac{\pi}{2\sqrt{2}}\arctan\left(a\right)\\
&=\dfrac{\pi}{8}\int_0^{\sqrt[4]a}\dfrac{\,v^4\,\sec\left(\dfrac{\pi}{8}\right)+\csc\left(\dfrac{\pi}{8}\right)}{\left(1+v^8\right)v}\left(4v^3\right)\mathrm{d}v-\dfrac{\pi}{2\sqrt{2}}\arctan\left(a\right)\\
&=\dfrac{\pi}{2}\int_0^{\sqrt[4]a}\dfrac{\,v^4\,\sec\left(\dfrac{\pi}{8}\right)+\csc\left(\dfrac{\pi}{8}\right)}{1+v^8}\left(v^2\right)\mathrm{d}v-\dfrac{\pi}{2\sqrt{2}}\arctan\left(a\right)
\end{align*}
\begin{align*}
G(a)
&=\dfrac{\pi}{2}\int_0^{\sqrt[4]a}\dfrac{\,v^4\,\sec\left(\dfrac{\pi}{8}\right)+\csc\left(\dfrac{\pi}{8}\right)}{1+v^8}\left(v^2\right)\mathrm{d}v-\dfrac{\pi}{2\sqrt{2}}\arctan\left(a\right)\\
\\
&=\qquad
\begin{split}
-\dfrac{\pi}{2\sqrt2}\arctan\left(a\right)\qquad\qquad\qquad\qquad\quad\,\,\,\,\\
+\dfrac{\pi}{2\sqrt2}\arctan\left(\sqrt[4]{a}\csc\left(\dfrac{\pi}{8}\right)-\cot\left(\dfrac{\pi}{8}\right)\right)\\
+\dfrac{\pi}{2\sqrt2}\arctan\left(\sqrt[4]{a}\csc\left(\dfrac{\pi}{8}\right)+\cot\left(\dfrac{\pi}{8}\right)\right)\\
+\dfrac{\pi}{4\sqrt2}\ln\left(1-2\sqrt[4]{a}\sin\left(\dfrac{\pi}{8}\right)+\sqrt{a}\right)\\
-\dfrac{\pi}{4\sqrt2}\ln\left(1+2\sqrt[4]{a}\sin\left(\dfrac{\pi}{8}\right)+\sqrt{a}\right)
\end{split}
\\
\end{align*}
...- Integrate[ArcTan[x^4]/(1 + x^4), {x, 0, +Infinity}] // N
- (-Pi/(2 Sqrt[2])*ArcTan[1]
- + Pi/(2 Sqrt[2])*
- ArcTan[Power[1, 1/4]*Csc[Pi/8] - Cot[Pi/8]]
- + Pi/(2 Sqrt[2])*
- ArcTan[Power[1, 1/4]*Csc[Pi/8] + Cot[Pi/8]]
- + Pi/(4 Sqrt[2])*
- Log[1 - 2*Power[1, 1/4]*Sin[Pi/8] + Sqrt[1]]
- - Pi/(4 Sqrt[2])*
- Log[1 + 2*Power[1, 1/4]*Sin[Pi/8] + Sqrt[1]]) // N
复制代码 ...
\begin{align*}
G(1)&=\int_0^{+\infty}\dfrac{\arctan\left(x^4\right)}{1+x^4}\mathrm{d}x\\
G(1)&=\int_0^{+\infty}\dfrac{\arctan\left((bw)^4\right)}{1+(bw)^4}\mathrm{d}(bw)\\
\dfrac{G(1)}{b}&=\int_0^{+\infty}\dfrac{\arctan\left(b^4w^4\right)}{1+b^4w^4}\mathrm{d}w\\
\\
&=\quad
\begin{split}
-\dfrac{\pi}{2\sqrt{2\sqrt{b}\,}}\arctan\left(1\right)\qquad\qquad\qquad\quad\,\,\,\,\,\\
+\dfrac{\pi}{2\sqrt{2\sqrt{b}\,}}\arctan\left(\csc\left(\dfrac{\pi}{8}\right)-\cot\left(\dfrac{\pi}{8}\right)\right)\\
+\dfrac{\pi}{2\sqrt{2\sqrt{b}\,}}\arctan\left(\csc\left(\dfrac{\pi}{8}\right)+\cot\left(\dfrac{\pi}{8}\right)\right)\\
+\dfrac{\pi}{4\sqrt{2\sqrt{b}\,}}\ln\left(1-\sin\left(\dfrac{\pi}{8}\right)\right)\qquad\quad\\
-\dfrac{\pi}{4\sqrt{2\sqrt{b}\,}}\ln\left(1+\sin\left(\dfrac{\pi}{8}\right)\right)\qquad\quad
\end{split}\\
\\
&=\dfrac{\pi\left(\pi-4\operatorname{artanh}\left(\sin\dfrac{\pi}{8}\right)\right)}{8\sqrt{2\sqrt{b}\,}}\\
&=\dfrac{\pi\left(\pi-4\operatorname{arcoth}\left(\csc\dfrac{\pi}{8}\right)\right)}{8\sqrt{2\sqrt{b}\,}}
\end{align*}
...- NIntegrate[ArcTan[2 x^4]/(1 + 2 x^4), {x, 0, +Infinity}] // N
- (-Pi/(2 Sqrt[2 Sqrt[2]])*ArcTan[1]
- + Pi/(2 Sqrt[2 Sqrt[2]])*ArcTan[Csc[Pi/8] - Cot[Pi/8]]
- + Pi/(2 Sqrt[2 Sqrt[2]])*ArcTan[Csc[Pi/8] + Cot[Pi/8]]
- + Pi/(4 Sqrt[2 Sqrt[2]])*Log[1 - Sin[Pi/8]]
- - Pi/(4 Sqrt[2 Sqrt[2]])*Log[1 + Sin[Pi/8]]) // N
- Pi (Pi - 4 ArcCoth[Csc[Pi/8]])/(8 Sqrt[2 Sqrt[2]]) // N
复制代码 |
|