\(\int \frac {(-4+x^3) (-1+x^3+x^4)}{x^6 (-1+x^3)^{3/4}} \, dx\) [282]

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

Optimal result

Integrand size = 26, antiderivative size = 26 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4 \sqrt [4]{-1+x^3} \left (-1+x^3+5 x^4\right )}{5 x^5} \]

[Out]

-4/5*(x^3-1)^(1/4)*(5*x^4+x^3-1)/x^5

Rubi [A] (verified)

Time = 0.09 (sec) , antiderivative size = 47, normalized size of antiderivative = 1.81, number of steps used = 5, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.115, Rules used = {1849, 1600, 460} \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4 \sqrt [4]{x^3-1}}{x}+\frac {4 \sqrt [4]{x^3-1}}{5 x^5}-\frac {4 \sqrt [4]{x^3-1}}{5 x^2} \]

[In]

Int[((-4 + x^3)*(-1 + x^3 + x^4))/(x^6*(-1 + x^3)^(3/4)),x]

[Out]

(4*(-1 + x^3)^(1/4))/(5*x^5) - (4*(-1 + x^3)^(1/4))/(5*x^2) - (4*(-1 + x^3)^(1/4))/x

Rule 460

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

Rule 1600

Int[(u_.)*(Px_)^(p_.)*(Qx_)^(q_.), x_Symbol] :> Int[u*PolynomialQuotient[Px, Qx, x]^p*Qx^(p + q), x] /; FreeQ[
q, x] && PolyQ[Px, x] && PolyQ[Qx, x] && EqQ[PolynomialRemainder[Px, Qx, x], 0] && IntegerQ[p] && LtQ[p*q, 0]

Rule 1849

Int[(Pq_)*((c_.)*(x_))^(m_)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> With[{Pq0 = Coeff[Pq, x, 0]}, Simp[Pq0
*(c*x)^(m + 1)*((a + b*x^n)^(p + 1)/(a*c*(m + 1))), x] + Dist[1/(2*a*c*(m + 1)), Int[(c*x)^(m + 1)*ExpandToSum
[2*a*(m + 1)*((Pq - Pq0)/x) - 2*b*Pq0*(m + n*(p + 1) + 1)*x^(n - 1), x]*(a + b*x^n)^p, x], x] /; NeQ[Pq0, 0]]
/; FreeQ[{a, b, c, p}, x] && PolyQ[Pq, x] && IGtQ[n, 0] && LtQ[m, -1] && LeQ[n - 1, Expon[Pq, x]]

Rubi steps \begin{align*} \text {integral}& = \frac {4 \sqrt [4]{-1+x^3}}{5 x^5}+\frac {1}{10} \int \frac {-16 x^2-40 x^3+10 x^5+10 x^6}{x^5 \left (-1+x^3\right )^{3/4}} \, dx \\ & = \frac {4 \sqrt [4]{-1+x^3}}{5 x^5}+\frac {1}{10} \int \frac {-16 x-40 x^2+10 x^4+10 x^5}{x^4 \left (-1+x^3\right )^{3/4}} \, dx \\ & = \frac {4 \sqrt [4]{-1+x^3}}{5 x^5}+\frac {1}{10} \int \frac {-16-40 x+10 x^3+10 x^4}{x^3 \left (-1+x^3\right )^{3/4}} \, dx \\ & = \frac {4 \sqrt [4]{-1+x^3}}{5 x^5}-\frac {4 \sqrt [4]{-1+x^3}}{5 x^2}+\frac {1}{40} \int \frac {-160+40 x^3}{x^2 \left (-1+x^3\right )^{3/4}} \, dx \\ & = \frac {4 \sqrt [4]{-1+x^3}}{5 x^5}-\frac {4 \sqrt [4]{-1+x^3}}{5 x^2}-\frac {4 \sqrt [4]{-1+x^3}}{x} \\ \end{align*}

Mathematica [A] (verified)

Time = 3.22 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.00 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4 \sqrt [4]{-1+x^3} \left (-1+x^3+5 x^4\right )}{5 x^5} \]

[In]

Integrate[((-4 + x^3)*(-1 + x^3 + x^4))/(x^6*(-1 + x^3)^(3/4)),x]

[Out]

(-4*(-1 + x^3)^(1/4)*(-1 + x^3 + 5*x^4))/(5*x^5)

Maple [A] (verified)

Time = 0.84 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.88

method result size
trager \(-\frac {4 \left (x^{3}-1\right )^{\frac {1}{4}} \left (5 x^{4}+x^{3}-1\right )}{5 x^{5}}\) \(23\)
gosper \(-\frac {4 \left (x -1\right ) \left (x^{2}+x +1\right ) \left (5 x^{4}+x^{3}-1\right )}{5 x^{5} \left (x^{3}-1\right )^{\frac {3}{4}}}\) \(32\)
risch \(-\frac {4 \left (5 x^{7}+x^{6}-5 x^{4}-2 x^{3}+1\right )}{5 \left (x^{3}-1\right )^{\frac {3}{4}} x^{5}}\) \(33\)
meijerg \(\frac {{\left (-\operatorname {signum}\left (x^{3}-1\right )\right )}^{\frac {3}{4}} x^{2} \operatorname {hypergeom}\left (\left [\frac {2}{3}, \frac {3}{4}\right ], \left [\frac {5}{3}\right ], x^{3}\right )}{2 \operatorname {signum}\left (x^{3}-1\right )^{\frac {3}{4}}}+\frac {{\left (-\operatorname {signum}\left (x^{3}-1\right )\right )}^{\frac {3}{4}} x \operatorname {hypergeom}\left (\left [\frac {1}{3}, \frac {3}{4}\right ], \left [\frac {4}{3}\right ], x^{3}\right )}{\operatorname {signum}\left (x^{3}-1\right )^{\frac {3}{4}}}+\frac {5 {\left (-\operatorname {signum}\left (x^{3}-1\right )\right )}^{\frac {3}{4}} \operatorname {hypergeom}\left (\left [-\frac {2}{3}, \frac {3}{4}\right ], \left [\frac {1}{3}\right ], x^{3}\right )}{2 \operatorname {signum}\left (x^{3}-1\right )^{\frac {3}{4}} x^{2}}-\frac {4 {\left (-\operatorname {signum}\left (x^{3}-1\right )\right )}^{\frac {3}{4}} \operatorname {hypergeom}\left (\left [-\frac {5}{3}, \frac {3}{4}\right ], \left [-\frac {2}{3}\right ], x^{3}\right )}{5 \operatorname {signum}\left (x^{3}-1\right )^{\frac {3}{4}} x^{5}}+\frac {4 {\left (-\operatorname {signum}\left (x^{3}-1\right )\right )}^{\frac {3}{4}} \operatorname {hypergeom}\left (\left [-\frac {1}{3}, \frac {3}{4}\right ], \left [\frac {2}{3}\right ], x^{3}\right )}{\operatorname {signum}\left (x^{3}-1\right )^{\frac {3}{4}} x}\) \(159\)

[In]

int((x^3-4)*(x^4+x^3-1)/x^6/(x^3-1)^(3/4),x,method=_RETURNVERBOSE)

[Out]

-4/5*(x^3-1)^(1/4)*(5*x^4+x^3-1)/x^5

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.85 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4 \, {\left (5 \, x^{4} + x^{3} - 1\right )} {\left (x^{3} - 1\right )}^{\frac {1}{4}}}{5 \, x^{5}} \]

[In]

integrate((x^3-4)*(x^4+x^3-1)/x^6/(x^3-1)^(3/4),x, algorithm="fricas")

[Out]

-4/5*(5*x^4 + x^3 - 1)*(x^3 - 1)^(1/4)/x^5

Sympy [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 2.03 (sec) , antiderivative size = 178, normalized size of antiderivative = 6.85 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=\frac {x^{2} e^{- \frac {3 i \pi }{4}} \Gamma \left (\frac {2}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} \frac {2}{3}, \frac {3}{4} \\ \frac {5}{3} \end {matrix}\middle | {x^{3}} \right )}}{3 \Gamma \left (\frac {5}{3}\right )} + \frac {x e^{- \frac {3 i \pi }{4}} \Gamma \left (\frac {1}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} \frac {1}{3}, \frac {3}{4} \\ \frac {4}{3} \end {matrix}\middle | {x^{3}} \right )}}{3 \Gamma \left (\frac {4}{3}\right )} + \frac {4 e^{\frac {i \pi }{4}} \Gamma \left (- \frac {1}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} - \frac {1}{3}, \frac {3}{4} \\ \frac {2}{3} \end {matrix}\middle | {x^{3}} \right )}}{3 x \Gamma \left (\frac {2}{3}\right )} + \frac {5 e^{\frac {i \pi }{4}} \Gamma \left (- \frac {2}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} - \frac {2}{3}, \frac {3}{4} \\ \frac {1}{3} \end {matrix}\middle | {x^{3}} \right )}}{3 x^{2} \Gamma \left (\frac {1}{3}\right )} - \frac {4 e^{\frac {i \pi }{4}} \Gamma \left (- \frac {5}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} - \frac {5}{3}, \frac {3}{4} \\ - \frac {2}{3} \end {matrix}\middle | {x^{3}} \right )}}{3 x^{5} \Gamma \left (- \frac {2}{3}\right )} \]

[In]

integrate((x**3-4)*(x**4+x**3-1)/x**6/(x**3-1)**(3/4),x)

[Out]

x**2*exp(-3*I*pi/4)*gamma(2/3)*hyper((2/3, 3/4), (5/3,), x**3)/(3*gamma(5/3)) + x*exp(-3*I*pi/4)*gamma(1/3)*hy
per((1/3, 3/4), (4/3,), x**3)/(3*gamma(4/3)) + 4*exp(I*pi/4)*gamma(-1/3)*hyper((-1/3, 3/4), (2/3,), x**3)/(3*x
*gamma(2/3)) + 5*exp(I*pi/4)*gamma(-2/3)*hyper((-2/3, 3/4), (1/3,), x**3)/(3*x**2*gamma(1/3)) - 4*exp(I*pi/4)*
gamma(-5/3)*hyper((-5/3, 3/4), (-2/3,), x**3)/(3*x**5*gamma(-2/3))

Maxima [A] (verification not implemented)

none

Time = 0.30 (sec) , antiderivative size = 38, normalized size of antiderivative = 1.46 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4 \, {\left (5 \, x^{7} + x^{6} - 5 \, x^{4} - 2 \, x^{3} + 1\right )}}{5 \, {\left (x^{2} + x + 1\right )}^{\frac {3}{4}} {\left (x - 1\right )}^{\frac {3}{4}} x^{5}} \]

[In]

integrate((x^3-4)*(x^4+x^3-1)/x^6/(x^3-1)^(3/4),x, algorithm="maxima")

[Out]

-4/5*(5*x^7 + x^6 - 5*x^4 - 2*x^3 + 1)/((x^2 + x + 1)^(3/4)*(x - 1)^(3/4)*x^5)

Giac [F]

\[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=\int { \frac {{\left (x^{4} + x^{3} - 1\right )} {\left (x^{3} - 4\right )}}{{\left (x^{3} - 1\right )}^{\frac {3}{4}} x^{6}} \,d x } \]

[In]

integrate((x^3-4)*(x^4+x^3-1)/x^6/(x^3-1)^(3/4),x, algorithm="giac")

[Out]

integrate((x^4 + x^3 - 1)*(x^3 - 4)/((x^3 - 1)^(3/4)*x^6), x)

Mupad [B] (verification not implemented)

Time = 5.23 (sec) , antiderivative size = 39, normalized size of antiderivative = 1.50 \[ \int \frac {\left (-4+x^3\right ) \left (-1+x^3+x^4\right )}{x^6 \left (-1+x^3\right )^{3/4}} \, dx=-\frac {4\,x^3\,{\left (x^3-1\right )}^{1/4}-4\,{\left (x^3-1\right )}^{1/4}+20\,x^4\,{\left (x^3-1\right )}^{1/4}}{5\,x^5} \]

[In]

int(((x^3 - 4)*(x^3 + x^4 - 1))/(x^6*(x^3 - 1)^(3/4)),x)

[Out]

-(4*x^3*(x^3 - 1)^(1/4) - 4*(x^3 - 1)^(1/4) + 20*x^4*(x^3 - 1)^(1/4))/(5*x^5)