3.2.84 \(\int f^{a+b x^n} x^{-1+2 n} \, dx\) [184]

Optimal. Leaf size=45 \[ -\frac {f^{a+b x^n}}{b^2 n \log ^2(f)}+\frac {f^{a+b x^n} x^n}{b n \log (f)} \]

[Out]

-f^(a+b*x^n)/b^2/n/ln(f)^2+f^(a+b*x^n)*x^n/b/n/ln(f)

________________________________________________________________________________________

Rubi [A]
time = 0.03, antiderivative size = 45, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.118, Rules used = {2244, 2240} \begin {gather*} \frac {x^n f^{a+b x^n}}{b n \log (f)}-\frac {f^{a+b x^n}}{b^2 n \log ^2(f)} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[f^(a + b*x^n)*x^(-1 + 2*n),x]

[Out]

-(f^(a + b*x^n)/(b^2*n*Log[f]^2)) + (f^(a + b*x^n)*x^n)/(b*n*Log[f])

Rule 2240

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

Rule 2244

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[(c + d*x)^(m
- n + 1)*(F^(a + b*(c + d*x)^n)/(b*d*n*Log[F])), x] - Dist[(m - n + 1)/(b*n*Log[F]), Int[(c + d*x)^Simplify[m
- n]*F^(a + b*(c + d*x)^n), x], x] /; FreeQ[{F, a, b, c, d, m, n}, x] && IntegerQ[2*Simplify[(m + 1)/n]] && Lt
Q[0, Simplify[(m + 1)/n], 5] &&  !RationalQ[m] && SumSimplerQ[m, -n]

Rubi steps

\begin {align*} \int f^{a+b x^n} x^{-1+2 n} \, dx &=\frac {f^{a+b x^n} x^n}{b n \log (f)}-\frac {\int f^{a+b x^n} x^{-1+n} \, dx}{b \log (f)}\\ &=-\frac {f^{a+b x^n}}{b^2 n \log ^2(f)}+\frac {f^{a+b x^n} x^n}{b n \log (f)}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C] Result contains higher order function than in optimal. Order 4 vs. order 3 in optimal.
time = 0.00, size = 25, normalized size = 0.56 \begin {gather*} -\frac {f^a \Gamma \left (2,-b x^n \log (f)\right )}{b^2 n \log ^2(f)} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[f^(a + b*x^n)*x^(-1 + 2*n),x]

[Out]

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

________________________________________________________________________________________

Maple [A]
time = 0.04, size = 30, normalized size = 0.67

method	result	size
risch	\(\frac {\left (b \,x^{n} \ln \left (f \right )-1\right ) f^{a +b \,x^{n}}}{\ln \left (f \right )^{2} b^{2} n}\)	\(30\)
meijerg	\(\frac {f^{a} \left (1-\frac {\left (2-2 b \,x^{n} \ln \left (f \right )\right ) {\mathrm e}^{b \,x^{n} \ln \left (f \right )}}{2}\right )}{\ln \left (f \right )^{2} b^{2} n}\)	\(37\)
norman	\(\frac {{\mathrm e}^{n \ln \left (x \right )} {\mathrm e}^{\left (a +b \,{\mathrm e}^{n \ln \left (x \right )}\right ) \ln \left (f \right )}}{\ln \left (f \right ) b n}-\frac {{\mathrm e}^{\left (a +b \,{\mathrm e}^{n \ln \left (x \right )}\right ) \ln \left (f \right )}}{\ln \left (f \right )^{2} b^{2} n}\)	\(56\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(f^(a+b*x^n)*x^(-1+2*n),x,method=_RETURNVERBOSE)

[Out]

(b*x^n*ln(f)-1)/ln(f)^2/b^2/n*f^(a+b*x^n)

________________________________________________________________________________________

Maxima [A]
time = 0.28, size = 34, normalized size = 0.76 \begin {gather*} \frac {{\left (b f^{a} x^{n} \log \left (f\right ) - f^{a}\right )} f^{b x^{n}}}{b^{2} n \log \left (f\right )^{2}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

(b*f^a*x^n*log(f) - f^a)*f^(b*x^n)/(b^2*n*log(f)^2)

________________________________________________________________________________________

Fricas [A]
time = 0.52, size = 33, normalized size = 0.73 \begin {gather*} \frac {{\left (b x^{n} \log \left (f\right ) - 1\right )} e^{\left (b x^{n} \log \left (f\right ) + a \log \left (f\right )\right )}}{b^{2} n \log \left (f\right )^{2}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

(b*x^n*log(f) - 1)*e^(b*x^n*log(f) + a*log(f))/(b^2*n*log(f)^2)

________________________________________________________________________________________

Sympy [A]
time = 104.09, size = 49, normalized size = 1.09 \begin {gather*} \begin {cases} - \frac {b f^{a} f^{b x^{n}} x^{3 n} \log {\left (f \right )}}{6 n} + \frac {f^{a} f^{b x^{n}} x^{2 n}}{2 n} & \text {for}\: n \neq 0 \\f^{a + b} \log {\left (x \right )} & \text {otherwise} \end {cases} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(f**(a+b*x**n)*x**(-1+2*n),x)

[Out]

Piecewise((-b*f**a*f**(b*x**n)*x**(3*n)*log(f)/(6*n) + f**a*f**(b*x**n)*x**(2*n)/(2*n), Ne(n, 0)), (f**(a + b)
*log(x), True))

________________________________________________________________________________________

Giac [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integrate(f^(b*x^n + a)*x^(2*n - 1), x)

________________________________________________________________________________________

Mupad [F]
time = 0.00, size = -1, normalized size = -0.02 \begin {gather*} \int f^{a+b\,x^n}\,x^{2\,n-1} \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(f^(a + b*x^n)*x^(2*n - 1),x)

[Out]

int(f^(a + b*x^n)*x^(2*n - 1), x)

________________________________________________________________________________________