\(\int f^{a+b x^2} x^{12} \, dx\) [82]

   Optimal result
   Rubi [A] (verified)
   Mathematica [A] (verified)
   Maple [A] (verified)
   Fricas [A] (verification not implemented)
   Sympy [F]
   Maxima [A] (verification not implemented)
   Giac [A] (verification not implemented)
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 13, antiderivative size = 34 \[ \int f^{a+b x^2} x^{12} \, dx=-\frac {f^a x^{13} \Gamma \left (\frac {13}{2},-b x^2 \log (f)\right )}{2 \left (-b x^2 \log (f)\right )^{13/2}} \]

[Out]

-1/2*f^a*x^13*(524288/5621533568633696205238621875*GAMMA(51/2,-b*x^2*ln(f))-524288/562153356863369620523862187
5*(-b*x^2*ln(f))^(49/2)*exp(b*x^2*ln(f))-262144/114725174870075432759971875*(-b*x^2*ln(f))^(47/2)*exp(b*x^2*ln
(f))-131072/2440961167448413462978125*(-b*x^2*ln(f))^(45/2)*exp(b*x^2*ln(f))-65536/54243581498853632510625*(-b
*x^2*ln(f))^(43/2)*exp(b*x^2*ln(f))-32768/1261478639508224011875*(-b*x^2*ln(f))^(41/2)*exp(b*x^2*ln(f))-16384/
30767771695322536875*(-b*x^2*ln(f))^(39/2)*exp(b*x^2*ln(f))-8192/788917222956988125*(-b*x^2*ln(f))^(37/2)*exp(
b*x^2*ln(f))-4096/21322087106945625*(-b*x^2*ln(f))^(35/2)*exp(b*x^2*ln(f))-2048/609202488769875*(-b*x^2*ln(f))
^(33/2)*exp(b*x^2*ln(f))-1024/18460681477875*(-b*x^2*ln(f))^(31/2)*exp(b*x^2*ln(f))-512/595505854125*(-b*x^2*l
n(f))^(29/2)*exp(b*x^2*ln(f))-256/20534684625*(-b*x^2*ln(f))^(27/2)*exp(b*x^2*ln(f))-128/760543875*(-b*x^2*ln(
f))^(25/2)*exp(b*x^2*ln(f))-64/30421755*(-b*x^2*ln(f))^(23/2)*exp(b*x^2*ln(f))-32/1322685*(-b*x^2*ln(f))^(21/2
)*exp(b*x^2*ln(f))-16/62985*(-b*x^2*ln(f))^(19/2)*exp(b*x^2*ln(f))-8/3315*(-b*x^2*ln(f))^(17/2)*exp(b*x^2*ln(f
))-4/195*(-b*x^2*ln(f))^(15/2)*exp(b*x^2*ln(f))-2/13*(-b*x^2*ln(f))^(13/2)*exp(b*x^2*ln(f)))/(-b*x^2*ln(f))^(1
3/2)

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 34, normalized size of antiderivative = 1.00, number of steps used = 1, number of rules used = 1, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.077, Rules used = {2250} \[ \int f^{a+b x^2} x^{12} \, dx=-\frac {x^{13} f^a \Gamma \left (\frac {13}{2},-b x^2 \log (f)\right )}{2 \left (-b x^2 \log (f)\right )^{13/2}} \]

[In]

Int[f^(a + b*x^2)*x^12,x]

[Out]

-1/2*(f^a*x^13*Gamma[13/2, -(b*x^2*Log[f])])/(-(b*x^2*Log[f]))^(13/2)

Rule 2250

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((e_.) + (f_.)*(x_))^(m_.), x_Symbol] :> Simp[(-F^a)*((e +
f*x)^(m + 1)/(f*n*((-b)*(c + d*x)^n*Log[F])^((m + 1)/n)))*Gamma[(m + 1)/n, (-b)*(c + d*x)^n*Log[F]], x] /; Fre
eQ[{F, a, b, c, d, e, f, m, n}, x] && EqQ[d*e - c*f, 0]

Rubi steps \begin{align*} \text {integral}& = -\frac {f^a x^{13} \Gamma \left (\frac {13}{2},-b x^2 \log (f)\right )}{2 \left (-b x^2 \log (f)\right )^{13/2}} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.05 (sec) , antiderivative size = 34, normalized size of antiderivative = 1.00 \[ \int f^{a+b x^2} x^{12} \, dx=-\frac {f^a x^{13} \Gamma \left (\frac {13}{2},-b x^2 \log (f)\right )}{2 \left (-b x^2 \log (f)\right )^{13/2}} \]

[In]

Integrate[f^(a + b*x^2)*x^12,x]

[Out]

-1/2*(f^a*x^13*Gamma[13/2, -(b*x^2*Log[f])])/(-(b*x^2*Log[f]))^(13/2)

Maple [A] (verified)

Time = 0.29 (sec) , antiderivative size = 123, normalized size of antiderivative = 3.62

method result size
meijerg \(\frac {f^{a} \left (-\frac {x \left (-b \right )^{\frac {13}{2}} \sqrt {\ln \left (f \right )}\, \left (-416 b^{5} x^{10} \ln \left (f \right )^{5}+2288 b^{4} x^{8} \ln \left (f \right )^{4}-10296 b^{3} x^{6} \ln \left (f \right )^{3}+36036 b^{2} x^{4} \ln \left (f \right )^{2}-90090 b \,x^{2} \ln \left (f \right )+135135\right ) {\mathrm e}^{b \,x^{2} \ln \left (f \right )}}{416 b^{6}}+\frac {10395 \left (-b \right )^{\frac {13}{2}} \sqrt {\pi }\, \operatorname {erfi}\left (x \sqrt {b}\, \sqrt {\ln \left (f \right )}\right )}{64 b^{\frac {13}{2}}}\right )}{2 b^{6} \ln \left (f \right )^{\frac {13}{2}} \sqrt {-b}}\) \(123\)
risch \(\frac {f^{a} f^{b \,x^{2}} x^{11}}{2 \ln \left (f \right ) b}-\frac {11 f^{a} x^{9} f^{b \,x^{2}}}{4 \ln \left (f \right )^{2} b^{2}}+\frac {99 f^{a} x^{7} f^{b \,x^{2}}}{8 \ln \left (f \right )^{3} b^{3}}-\frac {693 f^{a} x^{5} f^{b \,x^{2}}}{16 \ln \left (f \right )^{4} b^{4}}+\frac {3465 f^{a} x^{3} f^{b \,x^{2}}}{32 \ln \left (f \right )^{5} b^{5}}-\frac {10395 f^{a} x \,f^{b \,x^{2}}}{64 \ln \left (f \right )^{6} b^{6}}+\frac {10395 f^{a} \sqrt {\pi }\, \operatorname {erf}\left (\sqrt {-b \ln \left (f \right )}\, x \right )}{128 \ln \left (f \right )^{6} b^{6} \sqrt {-b \ln \left (f \right )}}\) \(164\)

[In]

int(f^(b*x^2+a)*x^12,x,method=_RETURNVERBOSE)

[Out]

1/2*f^a/b^6/ln(f)^(13/2)/(-b)^(1/2)*(-1/416*x*(-b)^(13/2)*ln(f)^(1/2)*(-416*b^5*x^10*ln(f)^5+2288*b^4*x^8*ln(f
)^4-10296*b^3*x^6*ln(f)^3+36036*b^2*x^4*ln(f)^2-90090*b*x^2*ln(f)+135135)/b^6*exp(b*x^2*ln(f))+10395/64*(-b)^(
13/2)/b^(13/2)*Pi^(1/2)*erfi(x*b^(1/2)*ln(f)^(1/2)))

Fricas [A] (verification not implemented)

none

Time = 0.10 (sec) , antiderivative size = 113, normalized size of antiderivative = 3.32 \[ \int f^{a+b x^2} x^{12} \, dx=-\frac {10395 \, \sqrt {\pi } \sqrt {-b \log \left (f\right )} f^{a} \operatorname {erf}\left (\sqrt {-b \log \left (f\right )} x\right ) - 2 \, {\left (32 \, b^{6} x^{11} \log \left (f\right )^{6} - 176 \, b^{5} x^{9} \log \left (f\right )^{5} + 792 \, b^{4} x^{7} \log \left (f\right )^{4} - 2772 \, b^{3} x^{5} \log \left (f\right )^{3} + 6930 \, b^{2} x^{3} \log \left (f\right )^{2} - 10395 \, b x \log \left (f\right )\right )} f^{b x^{2} + a}}{128 \, b^{7} \log \left (f\right )^{7}} \]

[In]

integrate(f^(b*x^2+a)*x^12,x, algorithm="fricas")

[Out]

-1/128*(10395*sqrt(pi)*sqrt(-b*log(f))*f^a*erf(sqrt(-b*log(f))*x) - 2*(32*b^6*x^11*log(f)^6 - 176*b^5*x^9*log(
f)^5 + 792*b^4*x^7*log(f)^4 - 2772*b^3*x^5*log(f)^3 + 6930*b^2*x^3*log(f)^2 - 10395*b*x*log(f))*f^(b*x^2 + a))
/(b^7*log(f)^7)

Sympy [F]

\[ \int f^{a+b x^2} x^{12} \, dx=\int f^{a + b x^{2}} x^{12}\, dx \]

[In]

integrate(f**(b*x**2+a)*x**12,x)

[Out]

Integral(f**(a + b*x**2)*x**12, x)

Maxima [A] (verification not implemented)

none

Time = 0.03 (sec) , antiderivative size = 127, normalized size of antiderivative = 3.74 \[ \int f^{a+b x^2} x^{12} \, dx=\frac {{\left (32 \, b^{5} f^{a} x^{11} \log \left (f\right )^{5} - 176 \, b^{4} f^{a} x^{9} \log \left (f\right )^{4} + 792 \, b^{3} f^{a} x^{7} \log \left (f\right )^{3} - 2772 \, b^{2} f^{a} x^{5} \log \left (f\right )^{2} + 6930 \, b f^{a} x^{3} \log \left (f\right ) - 10395 \, f^{a} x\right )} f^{b x^{2}}}{64 \, b^{6} \log \left (f\right )^{6}} + \frac {10395 \, \sqrt {\pi } f^{a} \operatorname {erf}\left (\sqrt {-b \log \left (f\right )} x\right )}{128 \, \sqrt {-b \log \left (f\right )} b^{6} \log \left (f\right )^{6}} \]

[In]

integrate(f^(b*x^2+a)*x^12,x, algorithm="maxima")

[Out]

1/64*(32*b^5*f^a*x^11*log(f)^5 - 176*b^4*f^a*x^9*log(f)^4 + 792*b^3*f^a*x^7*log(f)^3 - 2772*b^2*f^a*x^5*log(f)
^2 + 6930*b*f^a*x^3*log(f) - 10395*f^a*x)*f^(b*x^2)/(b^6*log(f)^6) + 10395/128*sqrt(pi)*f^a*erf(sqrt(-b*log(f)
)*x)/(sqrt(-b*log(f))*b^6*log(f)^6)

Giac [A] (verification not implemented)

none

Time = 0.14 (sec) , antiderivative size = 116, normalized size of antiderivative = 3.41 \[ \int f^{a+b x^2} x^{12} \, dx=-\frac {10395 \, \sqrt {\pi } f^{a} \operatorname {erf}\left (-\sqrt {-b \log \left (f\right )} x\right )}{128 \, \sqrt {-b \log \left (f\right )} b^{6} \log \left (f\right )^{6}} + \frac {{\left (32 \, b^{5} x^{11} \log \left (f\right )^{5} - 176 \, b^{4} x^{9} \log \left (f\right )^{4} + 792 \, b^{3} x^{7} \log \left (f\right )^{3} - 2772 \, b^{2} x^{5} \log \left (f\right )^{2} + 6930 \, b x^{3} \log \left (f\right ) - 10395 \, x\right )} e^{\left (b x^{2} \log \left (f\right ) + a \log \left (f\right )\right )}}{64 \, b^{6} \log \left (f\right )^{6}} \]

[In]

integrate(f^(b*x^2+a)*x^12,x, algorithm="giac")

[Out]

-10395/128*sqrt(pi)*f^a*erf(-sqrt(-b*log(f))*x)/(sqrt(-b*log(f))*b^6*log(f)^6) + 1/64*(32*b^5*x^11*log(f)^5 -
176*b^4*x^9*log(f)^4 + 792*b^3*x^7*log(f)^3 - 2772*b^2*x^5*log(f)^2 + 6930*b*x^3*log(f) - 10395*x)*e^(b*x^2*lo
g(f) + a*log(f))/(b^6*log(f)^6)

Mupad [B] (verification not implemented)

Time = 0.29 (sec) , antiderivative size = 154, normalized size of antiderivative = 4.53 \[ \int f^{a+b x^2} x^{12} \, dx=\frac {\frac {f^a\,\left (\frac {10395\,\sqrt {\pi }\,\mathrm {erfi}\left (\frac {b\,x\,\ln \left (f\right )}{\sqrt {b\,\ln \left (f\right )}}\right )}{128}-\frac {10395\,f^{b\,x^2}\,x\,\sqrt {b\,\ln \left (f\right )}}{64}\right )}{\sqrt {b\,\ln \left (f\right )}}-\frac {693\,b^2\,f^{b\,x^2+a}\,x^5\,{\ln \left (f\right )}^2}{16}+\frac {99\,b^3\,f^{b\,x^2+a}\,x^7\,{\ln \left (f\right )}^3}{8}-\frac {11\,b^4\,f^{b\,x^2+a}\,x^9\,{\ln \left (f\right )}^4}{4}+\frac {b^5\,f^{b\,x^2+a}\,x^{11}\,{\ln \left (f\right )}^5}{2}+\frac {3465\,b\,f^{b\,x^2+a}\,x^3\,\ln \left (f\right )}{32}}{b^6\,{\ln \left (f\right )}^6} \]

[In]

int(f^(a + b*x^2)*x^12,x)

[Out]

((f^a*((10395*pi^(1/2)*erfi((b*x*log(f))/(b*log(f))^(1/2)))/128 - (10395*f^(b*x^2)*x*(b*log(f))^(1/2))/64))/(b
*log(f))^(1/2) - (693*b^2*f^(a + b*x^2)*x^5*log(f)^2)/16 + (99*b^3*f^(a + b*x^2)*x^7*log(f)^3)/8 - (11*b^4*f^(
a + b*x^2)*x^9*log(f)^4)/4 + (b^5*f^(a + b*x^2)*x^11*log(f)^5)/2 + (3465*b*f^(a + b*x^2)*x^3*log(f))/32)/(b^6*
log(f)^6)