3.378 \(\int \frac {x^3}{13+\frac {2}{x}+15 x} \, dx\)

Optimal. Leaf size=40 \[ \frac {x^3}{45}-\frac {13 x^2}{450}+\frac {139 x}{3375}-\frac {16}{567} \log (3 x+2)+\frac {\log (5 x+1)}{4375} \]

[Out]

139/3375*x-13/450*x^2+1/45*x^3-16/567*ln(2+3*x)+1/4375*ln(1+5*x)

________________________________________________________________________________________

Rubi [A]  time = 0.02, antiderivative size = 40, normalized size of antiderivative = 1.00, number of steps used = 6, number of rules used = 4, integrand size = 16, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.250, Rules used = {1386, 701, 632, 31} \[ \frac {x^3}{45}-\frac {13 x^2}{450}+\frac {139 x}{3375}-\frac {16}{567} \log (3 x+2)+\frac {\log (5 x+1)}{4375} \]

Antiderivative was successfully verified.

[In]

Int[x^3/(13 + 2/x + 15*x),x]

[Out]

(139*x)/3375 - (13*x^2)/450 + x^3/45 - (16*Log[2 + 3*x])/567 + Log[1 + 5*x]/4375

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rule 632

Int[((d_.) + (e_.)*(x_))/((a_) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> With[{q = Rt[b^2 - 4*a*c, 2]}, Dist[
(c*d - e*(b/2 - q/2))/q, Int[1/(b/2 - q/2 + c*x), x], x] - Dist[(c*d - e*(b/2 + q/2))/q, Int[1/(b/2 + q/2 + c*
x), x], x]] /; FreeQ[{a, b, c, d, e}, x] && NeQ[2*c*d - b*e, 0] && NeQ[b^2 - 4*a*c, 0] && NiceSqrtQ[b^2 - 4*a*
c]

Rule 701

Int[((d_.) + (e_.)*(x_))^(m_)/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Int[PolynomialDivide[(d + e*x)
^m, a + b*x + c*x^2, x], x] /; FreeQ[{a, b, c, d, e}, x] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2,
0] && NeQ[2*c*d - b*e, 0] && IGtQ[m, 1] && (NeQ[d, 0] || GtQ[m, 2])

Rule 1386

Int[(x_)^(m_.)*((a_) + (c_.)*(x_)^(n_.) + (b_.)*(x_)^(mn_))^(p_.), x_Symbol] :> Int[x^(m - n*p)*(b + a*x^n + c
*x^(2*n))^p, x] /; FreeQ[{a, b, c, m, n}, x] && EqQ[mn, -n] && IntegerQ[p] && PosQ[n]

Rubi steps

\begin {align*} \int \frac {x^3}{13+\frac {2}{x}+15 x} \, dx &=\int \frac {x^4}{2+13 x+15 x^2} \, dx\\ &=\int \left (\frac {139}{3375}-\frac {13 x}{225}+\frac {x^2}{15}-\frac {278+1417 x}{3375 \left (2+13 x+15 x^2\right )}\right ) \, dx\\ &=\frac {139 x}{3375}-\frac {13 x^2}{450}+\frac {x^3}{45}-\frac {\int \frac {278+1417 x}{2+13 x+15 x^2} \, dx}{3375}\\ &=\frac {139 x}{3375}-\frac {13 x^2}{450}+\frac {x^3}{45}+\frac {3}{875} \int \frac {1}{3+15 x} \, dx-\frac {80}{189} \int \frac {1}{10+15 x} \, dx\\ &=\frac {139 x}{3375}-\frac {13 x^2}{450}+\frac {x^3}{45}-\frac {16}{567} \log (2+3 x)+\frac {\log (1+5 x)}{4375}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.01, size = 40, normalized size = 1.00 \[ \frac {x^3}{45}-\frac {13 x^2}{450}+\frac {139 x}{3375}-\frac {16}{567} \log (3 x+2)+\frac {\log (5 x+1)}{4375} \]

Antiderivative was successfully verified.

[In]

Integrate[x^3/(13 + 2/x + 15*x),x]

[Out]

(139*x)/3375 - (13*x^2)/450 + x^3/45 - (16*Log[2 + 3*x])/567 + Log[1 + 5*x]/4375

________________________________________________________________________________________

fricas [A]  time = 0.63, size = 30, normalized size = 0.75 \[ \frac {1}{45} \, x^{3} - \frac {13}{450} \, x^{2} + \frac {139}{3375} \, x + \frac {1}{4375} \, \log \left (5 \, x + 1\right ) - \frac {16}{567} \, \log \left (3 \, x + 2\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^3/(13+2/x+15*x),x, algorithm="fricas")

[Out]

1/45*x^3 - 13/450*x^2 + 139/3375*x + 1/4375*log(5*x + 1) - 16/567*log(3*x + 2)

________________________________________________________________________________________

giac [A]  time = 0.28, size = 32, normalized size = 0.80 \[ \frac {1}{45} \, x^{3} - \frac {13}{450} \, x^{2} + \frac {139}{3375} \, x + \frac {1}{4375} \, \log \left ({\left | 5 \, x + 1 \right |}\right ) - \frac {16}{567} \, \log \left ({\left | 3 \, x + 2 \right |}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^3/(13+2/x+15*x),x, algorithm="giac")

[Out]

1/45*x^3 - 13/450*x^2 + 139/3375*x + 1/4375*log(abs(5*x + 1)) - 16/567*log(abs(3*x + 2))

________________________________________________________________________________________

maple [A]  time = 0.01, size = 31, normalized size = 0.78 \[ \frac {x^{3}}{45}-\frac {13 x^{2}}{450}+\frac {139 x}{3375}+\frac {\ln \left (5 x +1\right )}{4375}-\frac {16 \ln \left (3 x +2\right )}{567} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(x^3/(13+2/x+15*x),x)

[Out]

139/3375*x-13/450*x^2+1/45*x^3-16/567*ln(2+3*x)+1/4375*ln(1+5*x)

________________________________________________________________________________________

maxima [A]  time = 0.99, size = 30, normalized size = 0.75 \[ \frac {1}{45} \, x^{3} - \frac {13}{450} \, x^{2} + \frac {139}{3375} \, x + \frac {1}{4375} \, \log \left (5 \, x + 1\right ) - \frac {16}{567} \, \log \left (3 \, x + 2\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x^3/(13+2/x+15*x),x, algorithm="maxima")

[Out]

1/45*x^3 - 13/450*x^2 + 139/3375*x + 1/4375*log(5*x + 1) - 16/567*log(3*x + 2)

________________________________________________________________________________________

mupad [B]  time = 2.09, size = 26, normalized size = 0.65 \[ \frac {139\,x}{3375}-\frac {16\,\ln \left (x+\frac {2}{3}\right )}{567}+\frac {\ln \left (x+\frac {1}{5}\right )}{4375}-\frac {13\,x^2}{450}+\frac {x^3}{45} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(x^3/(15*x + 2/x + 13),x)

[Out]

(139*x)/3375 - (16*log(x + 2/3))/567 + log(x + 1/5)/4375 - (13*x^2)/450 + x^3/45

________________________________________________________________________________________

sympy [A]  time = 0.12, size = 34, normalized size = 0.85 \[ \frac {x^{3}}{45} - \frac {13 x^{2}}{450} + \frac {139 x}{3375} + \frac {\log {\left (x + \frac {1}{5} \right )}}{4375} - \frac {16 \log {\left (x + \frac {2}{3} \right )}}{567} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(x**3/(13+2/x+15*x),x)

[Out]

x**3/45 - 13*x**2/450 + 139*x/3375 + log(x + 1/5)/4375 - 16*log(x + 2/3)/567

________________________________________________________________________________________