3.203 \(\int f^{c (a+b x)^3} x \, dx\)

Optimal. Leaf size=92 \[ \frac {a (a+b x) \Gamma \left (\frac {1}{3},-c (a+b x)^3 \log (f)\right )}{3 b^2 \sqrt [3]{-c \log (f) (a+b x)^3}}-\frac {(a+b x)^2 \Gamma \left (\frac {2}{3},-c (a+b x)^3 \log (f)\right )}{3 b^2 \left (-c \log (f) (a+b x)^3\right )^{2/3}} \]

[Out]

-1/3*(b*x+a)^2*GAMMA(2/3,-c*(b*x+a)^3*ln(f))/b^2/(-c*(b*x+a)^3*ln(f))^(2/3)+1/3*a*(b*x+a)*GAMMA(1/3,-c*(b*x+a)
^3*ln(f))/b^2/(-c*(b*x+a)^3*ln(f))^(1/3)

________________________________________________________________________________________

Rubi [A]  time = 0.05, antiderivative size = 92, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 3, integrand size = 13, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.231, Rules used = {2226, 2208, 2218} \[ \frac {a (a+b x) \text {Gamma}\left (\frac {1}{3},-c \log (f) (a+b x)^3\right )}{3 b^2 \sqrt [3]{-c \log (f) (a+b x)^3}}-\frac {(a+b x)^2 \text {Gamma}\left (\frac {2}{3},-c \log (f) (a+b x)^3\right )}{3 b^2 \left (-c \log (f) (a+b x)^3\right )^{2/3}} \]

Antiderivative was successfully verified.

[In]

Int[f^(c*(a + b*x)^3)*x,x]

[Out]

-((a + b*x)^2*Gamma[2/3, -(c*(a + b*x)^3*Log[f])])/(3*b^2*(-(c*(a + b*x)^3*Log[f]))^(2/3)) + (a*(a + b*x)*Gamm
a[1/3, -(c*(a + b*x)^3*Log[f])])/(3*b^2*(-(c*(a + b*x)^3*Log[f]))^(1/3))

Rule 2208

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_)), x_Symbol] :> -Simp[(F^a*(c + d*x)*Gamma[1/n, -(b*(c + d*x)
^n*Log[F])])/(d*n*(-(b*(c + d*x)^n*Log[F]))^(1/n)), x] /; FreeQ[{F, a, b, c, d, n}, x] &&  !IntegerQ[2/n]

Rule 2218

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

Rule 2226

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*(u_), x_Symbol] :> Int[ExpandLinearProduct[F^(a + b*(c + d*
x)^n), u, c, d, x], x] /; FreeQ[{F, a, b, c, d, n}, x] && PolynomialQ[u, x]

Rubi steps

\begin {align*} \int f^{c (a+b x)^3} x \, dx &=\int \left (-\frac {a f^{c (a+b x)^3}}{b}+\frac {f^{c (a+b x)^3} (a+b x)}{b}\right ) \, dx\\ &=\frac {\int f^{c (a+b x)^3} (a+b x) \, dx}{b}-\frac {a \int f^{c (a+b x)^3} \, dx}{b}\\ &=-\frac {(a+b x)^2 \Gamma \left (\frac {2}{3},-c (a+b x)^3 \log (f)\right )}{3 b^2 \left (-c (a+b x)^3 \log (f)\right )^{2/3}}+\frac {a (a+b x) \Gamma \left (\frac {1}{3},-c (a+b x)^3 \log (f)\right )}{3 b^2 \sqrt [3]{-c (a+b x)^3 \log (f)}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.05, size = 86, normalized size = 0.93 \[ -\frac {(a+b x) \left ((a+b x) \Gamma \left (\frac {2}{3},-c (a+b x)^3 \log (f)\right )-a \sqrt [3]{-c \log (f) (a+b x)^3} \Gamma \left (\frac {1}{3},-c (a+b x)^3 \log (f)\right )\right )}{3 b^2 \left (-c \log (f) (a+b x)^3\right )^{2/3}} \]

Antiderivative was successfully verified.

[In]

Integrate[f^(c*(a + b*x)^3)*x,x]

[Out]

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

________________________________________________________________________________________

fricas [A]  time = 0.44, size = 114, normalized size = 1.24 \[ -\frac {\left (-b^{3} c \log \relax (f)\right )^{\frac {2}{3}} a \Gamma \left (\frac {1}{3}, -{\left (b^{3} c x^{3} + 3 \, a b^{2} c x^{2} + 3 \, a^{2} b c x + a^{3} c\right )} \log \relax (f)\right ) - \left (-b^{3} c \log \relax (f)\right )^{\frac {1}{3}} b \Gamma \left (\frac {2}{3}, -{\left (b^{3} c x^{3} + 3 \, a b^{2} c x^{2} + 3 \, a^{2} b c x + a^{3} c\right )} \log \relax (f)\right )}{3 \, b^{4} c \log \relax (f)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(f^(c*(b*x+a)^3)*x,x, algorithm="fricas")

[Out]

-1/3*((-b^3*c*log(f))^(2/3)*a*gamma(1/3, -(b^3*c*x^3 + 3*a*b^2*c*x^2 + 3*a^2*b*c*x + a^3*c)*log(f)) - (-b^3*c*
log(f))^(1/3)*b*gamma(2/3, -(b^3*c*x^3 + 3*a*b^2*c*x^2 + 3*a^2*b*c*x + a^3*c)*log(f)))/(b^4*c*log(f))

________________________________________________________________________________________

giac [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int f^{{\left (b x + a\right )}^{3} c} x\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(f^(c*(b*x+a)^3)*x,x, algorithm="giac")

[Out]

integrate(f^((b*x + a)^3*c)*x, x)

________________________________________________________________________________________

maple [F]  time = 0.04, size = 0, normalized size = 0.00 \[ \int x \,f^{\left (b x +a \right )^{3} c}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(f^((b*x+a)^3*c)*x,x)

[Out]

int(f^((b*x+a)^3*c)*x,x)

________________________________________________________________________________________

maxima [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int f^{{\left (b x + a\right )}^{3} c} x\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(f^(c*(b*x+a)^3)*x,x, algorithm="maxima")

[Out]

integrate(f^((b*x + a)^3*c)*x, x)

________________________________________________________________________________________

mupad [F]  time = 0.00, size = -1, normalized size = -0.01 \[ \int f^{c\,{\left (a+b\,x\right )}^3}\,x \,d x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(f^(c*(a + b*x)^3)*x,x)

[Out]

int(f^(c*(a + b*x)^3)*x, x)

________________________________________________________________________________________

sympy [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int f^{c \left (a + b x\right )^{3}} x\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(f**(c*(b*x+a)**3)*x,x)

[Out]

Integral(f**(c*(a + b*x)**3)*x, x)

________________________________________________________________________________________