3.12.17 \(\int \frac {4 x-6 x^2+24 x^3+(-1+4 x) \log (\frac {1}{2} (-x+4 x^2))}{-1+4 x} \, dx\)

Optimal. Leaf size=23 \[ -x+x \left (2 x^2+\log \left (\frac {1}{2} x (-1+4 x)\right )\right ) \]

________________________________________________________________________________________

Rubi [A]  time = 0.12, antiderivative size = 22, normalized size of antiderivative = 0.96, number of steps used = 7, number of rules used = 5, integrand size = 42, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.119, Rules used = {6742, 771, 2487, 31, 8} \begin {gather*} 2 x^3-x+x \log \left (-\frac {1}{2} (1-4 x) x\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

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

[Out]

-x + 2*x^3 + x*Log[-1/2*((1 - 4*x)*x)]

Rule 8

Int[a_, x_Symbol] :> Simp[a*x, x] /; FreeQ[a, x]

Rule 31

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

Rule 771

Int[((d_.) + (e_.)*(x_))^(m_.)*((f_.) + (g_.)*(x_))*((a_.) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> In
t[ExpandIntegrand[(d + e*x)^m*(f + g*x)*(a + b*x + c*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, f, g, m}, x] && N
eQ[b^2 - 4*a*c, 0] && IntegerQ[p] && (GtQ[p, 0] || (EqQ[a, 0] && IntegerQ[m]))

Rule 2487

Int[Log[(e_.)*((f_.)*((a_.) + (b_.)*(x_))^(p_.)*((c_.) + (d_.)*(x_))^(q_.))^(r_.)]^(s_.), x_Symbol] :> Simp[((
a + b*x)*Log[e*(f*(a + b*x)^p*(c + d*x)^q)^r]^s)/b, x] + (Dist[(q*r*s*(b*c - a*d))/b, Int[Log[e*(f*(a + b*x)^p
*(c + d*x)^q)^r]^(s - 1)/(c + d*x), x], x] - Dist[r*s*(p + q), Int[Log[e*(f*(a + b*x)^p*(c + d*x)^q)^r]^(s - 1
), x], x]) /; FreeQ[{a, b, c, d, e, f, p, q, r, s}, x] && NeQ[b*c - a*d, 0] && NeQ[p + q, 0] && IGtQ[s, 0] &&
LtQ[s, 4]

Rule 6742

Int[u_, x_Symbol] :> With[{v = ExpandIntegrand[u, x]}, Int[v, x] /; SumQ[v]]

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\int \left (\frac {2 x \left (2-3 x+12 x^2\right )}{-1+4 x}+\log \left (\frac {1}{2} x (-1+4 x)\right )\right ) \, dx\\ &=2 \int \frac {x \left (2-3 x+12 x^2\right )}{-1+4 x} \, dx+\int \log \left (\frac {1}{2} x (-1+4 x)\right ) \, dx\\ &=x \log \left (-\frac {1}{2} (1-4 x) x\right )-2 \int 1 \, dx+2 \int \left (\frac {1}{2}+3 x^2+\frac {1}{2 (-1+4 x)}\right ) \, dx-\int \frac {1}{-1+4 x} \, dx\\ &=-x+2 x^3+x \log \left (-\frac {1}{2} (1-4 x) x\right )\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.02, size = 45, normalized size = 1.96 \begin {gather*} -\frac {9}{32}-x+2 x^3-\frac {1}{4} \log (1-4 x)+\frac {1}{4} \log (-1+4 x)+x \log \left (\frac {1}{2} x (-1+4 x)\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

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

[Out]

-9/32 - x + 2*x^3 - Log[1 - 4*x]/4 + Log[-1 + 4*x]/4 + x*Log[(x*(-1 + 4*x))/2]

________________________________________________________________________________________

fricas [A]  time = 0.92, size = 21, normalized size = 0.91 \begin {gather*} 2 \, x^{3} + x \log \left (2 \, x^{2} - \frac {1}{2} \, x\right ) - x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

2*x^3 + x*log(2*x^2 - 1/2*x) - x

________________________________________________________________________________________

giac [A]  time = 0.34, size = 21, normalized size = 0.91 \begin {gather*} 2 \, x^{3} + x \log \left (2 \, x^{2} - \frac {1}{2} \, x\right ) - x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

2*x^3 + x*log(2*x^2 - 1/2*x) - x

________________________________________________________________________________________

maple [A]  time = 0.20, size = 22, normalized size = 0.96

method	result	size
norman	\(\ln \left (2 x^{2}-\frac {1}{2} x \right ) x -x +2 x^{3}\)	\(22\)
risch	\(\ln \left (2 x^{2}-\frac {1}{2} x \right ) x -x +2 x^{3}\)	\(22\)
default	\(2 x^{3}-x -x \ln \relax (2)+x \ln \left (4 x^{2}-x \right )\)	\(27\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

ln(2*x^2-1/2*x)*x-x+2*x^3

________________________________________________________________________________________

maxima [A]  time = 0.55, size = 39, normalized size = 1.70 \begin {gather*} 2 \, x^{3} - x {\left (\log \relax (2) + 2\right )} + \frac {1}{4} \, {\left (4 \, x - 1\right )} \log \left (4 \, x - 1\right ) + x \log \relax (x) + x + \frac {1}{4} \, \log \left (4 \, x - 1\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 0.92, size = 20, normalized size = 0.87 \begin {gather*} x\,\left (\ln \left (2\,x^2-\frac {x}{2}\right )-1\right )+2\,x^3 \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

x*(log(2*x^2 - x/2) - 1) + 2*x^3

________________________________________________________________________________________

sympy [A]  time = 0.13, size = 17, normalized size = 0.74 \begin {gather*} 2 x^{3} + x \log {\left (2 x^{2} - \frac {x}{2} \right )} - x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

2*x**3 + x*log(2*x**2 - x/2) - x

________________________________________________________________________________________