\(\int \frac {100+20 x+(-50-6 x^2) \log (x)}{5 x^2} \, dx\) [289]

Optimal result

Integrand size = 22, antiderivative size = 24 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=\frac {2 \left (3+\frac {5}{x}\right ) (-5+x) (x-x \log (x))}{5 x} \]

[Out]

1/10*(x-x*ln(x))*(-5+x)/x*(12+20/x)

Rubi [A] (verified)

Time = 0.05 (sec) , antiderivative size = 29, normalized size of antiderivative = 1.21, number of steps used = 7, number of rules used = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.182, Rules used = {12, 14, 45, 2372} \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=\frac {6 x}{5}-\frac {10}{x}-\frac {6}{5} x \log (x)+4 \log (x)+\frac {10 \log (x)}{x} \]

[In]

Int[(100 + 20*x + (-50 - 6*x^2)*Log[x])/(5*x^2),x]

[Out]

-10/x + (6*x)/5 + 4*Log[x] + (10*Log[x])/x - (6*x*Log[x])/5

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 45

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rule 2372

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))*(x_)^(m_.)*((d_) + (e_.)*(x_)^(r_.))^(q_.), x_Symbol] :> With[{u = I
ntHide[x^m*(d + e*x^r)^q, x]}, Dist[a + b*Log[c*x^n], u, x] - Dist[b*n, Int[SimplifyIntegrand[u/x, x], x], x]]
/; FreeQ[{a, b, c, d, e, n, r}, x] && IGtQ[q, 0] && IntegerQ[m] &&  !(EqQ[q, 1] && EqQ[m, -1])

Rubi steps \begin{align*} \text {integral}& = \frac {1}{5} \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{x^2} \, dx \\ & = \frac {1}{5} \int \left (\frac {20 (5+x)}{x^2}-\frac {2 \left (25+3 x^2\right ) \log (x)}{x^2}\right ) \, dx \\ & = -\left (\frac {2}{5} \int \frac {\left (25+3 x^2\right ) \log (x)}{x^2} \, dx\right )+4 \int \frac {5+x}{x^2} \, dx \\ & = \frac {10 \log (x)}{x}-\frac {6}{5} x \log (x)+\frac {2}{5} \int \left (3-\frac {25}{x^2}\right ) \, dx+4 \int \left (\frac {5}{x^2}+\frac {1}{x}\right ) \, dx \\ & = -\frac {10}{x}+\frac {6 x}{5}+4 \log (x)+\frac {10 \log (x)}{x}-\frac {6}{5} x \log (x) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.01 (sec) , antiderivative size = 29, normalized size of antiderivative = 1.21 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=-\frac {10}{x}+\frac {6 x}{5}+4 \log (x)+\frac {10 \log (x)}{x}-\frac {6}{5} x \log (x) \]

[In]

Integrate[(100 + 20*x + (-50 - 6*x^2)*Log[x])/(5*x^2),x]

[Out]

-10/x + (6*x)/5 + 4*Log[x] + (10*Log[x])/x - (6*x*Log[x])/5

Maple [A] (verified)

Time = 0.02 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.08

method	result	size
default	\(-\frac {6 x \ln \left (x \right )}{5}+\frac {6 x}{5}+\frac {10 \ln \left (x \right )}{x}-\frac {10}{x}+4 \ln \left (x \right )\)	\(26\)
parts	\(-\frac {6 x \ln \left (x \right )}{5}+\frac {6 x}{5}+\frac {10 \ln \left (x \right )}{x}-\frac {10}{x}+4 \ln \left (x \right )\)	\(26\)
norman	\(\frac {-10+4 x \ln \left (x \right )+\frac {6 x^{2}}{5}-\frac {6 x^{2} \ln \left (x \right )}{5}+10 \ln \left (x \right )}{x}\)	\(28\)
parallelrisch	\(\frac {-6 x^{2} \ln \left (x \right )+6 x^{2}+20 x \ln \left (x \right )-50+50 \ln \left (x \right )}{5 x}\)	\(29\)
risch	\(-\frac {2 \left (3 x^{2}-25\right ) \ln \left (x \right )}{5 x}+\frac {4 x \ln \left (x \right )+\frac {6 x^{2}}{5}-10}{x}\)	\(33\)

[In]

int(1/5*((-6*x^2-50)*ln(x)+20*x+100)/x^2,x,method=_RETURNVERBOSE)

[Out]

-6/5*x*ln(x)+6/5*x+10*ln(x)/x-10/x+4*ln(x)

Fricas [A] (verification not implemented)

none

Time = 0.23 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.08 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=\frac {2 \, {\left (3 \, x^{2} - {\left (3 \, x^{2} - 10 \, x - 25\right )} \log \left (x\right ) - 25\right )}}{5 \, x} \]

[In]

integrate(1/5*((-6*x^2-50)*log(x)+20*x+100)/x^2,x, algorithm="fricas")

[Out]

2/5*(3*x^2 - (3*x^2 - 10*x - 25)*log(x) - 25)/x

Sympy [A] (verification not implemented)

Time = 0.07 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.08 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=\frac {6 x}{5} + 4 \log {\left (x \right )} + \frac {\left (50 - 6 x^{2}\right ) \log {\left (x \right )}}{5 x} - \frac {10}{x} \]

[In]

integrate(1/5*((-6*x**2-50)*ln(x)+20*x+100)/x**2,x)

[Out]

6*x/5 + 4*log(x) + (50 - 6*x**2)*log(x)/(5*x) - 10/x

Maxima [A] (verification not implemented)

none

Time = 0.20 (sec) , antiderivative size = 25, normalized size of antiderivative = 1.04 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=-\frac {6}{5} \, x \log \left (x\right ) + \frac {6}{5} \, x + \frac {10 \, \log \left (x\right )}{x} - \frac {10}{x} + 4 \, \log \left (x\right ) \]

[In]

integrate(1/5*((-6*x^2-50)*log(x)+20*x+100)/x^2,x, algorithm="maxima")

[Out]

-6/5*x*log(x) + 6/5*x + 10*log(x)/x - 10/x + 4*log(x)

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.08 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=-\frac {2}{5} \, {\left (3 \, x - \frac {25}{x}\right )} \log \left (x\right ) + \frac {6}{5} \, x - \frac {10}{x} + 4 \, \log \left (x\right ) \]

[In]

integrate(1/5*((-6*x^2-50)*log(x)+20*x+100)/x^2,x, algorithm="giac")

[Out]

-2/5*(3*x - 25/x)*log(x) + 6/5*x - 10/x + 4*log(x)

Mupad [B] (verification not implemented)

Time = 8.66 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.00 \[ \int \frac {100+20 x+\left (-50-6 x^2\right ) \log (x)}{5 x^2} \, dx=4\,\ln \left (x\right )-x\,\left (\frac {6\,\ln \left (x\right )}{5}-\frac {6}{5}\right )+\frac {10\,\ln \left (x\right )-10}{x} \]

[In]

int((4*x - (log(x)*(6*x^2 + 50))/5 + 20)/x^2,x)

[Out]

4*log(x) - x*((6*log(x))/5 - 6/5) + (10*log(x) - 10)/x