\(\int \frac {-144+9 x^2+(240+60 x) \log (\frac {14 x}{3})-120 \log ^2(\frac {14 x}{3})+100 \log ^3(\frac {14 x}{3})-25 \log ^4(\frac {14 x}{3})}{9 x^2} \, dx\) [8709]

Optimal result

Integrand size = 56, antiderivative size = 21 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=\frac {\left (4+x+\frac {5}{3} \log ^2\left (\frac {14 x}{3}\right )\right )^2}{x} \]

[Out]

(x+4+5/3*ln(14/3*x)^2)^2/x

Rubi [B] (verified)

Leaf count is larger than twice the leaf count of optimal. \(57\) vs. \(2(21)=42\).

Time = 0.11 (sec) , antiderivative size = 57, normalized size of antiderivative = 2.71, number of steps used = 18, number of rules used = 7, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.125, Rules used = {12, 14, 45, 2372, 2338, 2342, 2341} \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=x+\frac {16}{x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x}+\frac {40 \log ^2\left (\frac {14 x}{3}\right )}{3 x}-\frac {10 \log ^2(x)}{3}+\frac {20}{3} \log (x) \log \left (\frac {14 x}{3}\right ) \]

[In]

Int[(-144 + 9*x^2 + (240 + 60*x)*Log[(14*x)/3] - 120*Log[(14*x)/3]^2 + 100*Log[(14*x)/3]^3 - 25*Log[(14*x)/3]^
4)/(9*x^2),x]

[Out]

16/x + x - (10*Log[x]^2)/3 + (20*Log[x]*Log[(14*x)/3])/3 + (40*Log[(14*x)/3]^2)/(3*x) + (25*Log[(14*x)/3]^4)/(
9*x)

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 2338

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))/(x_), x_Symbol] :> Simp[(a + b*Log[c*x^n])^2/(2*b*n), x] /; FreeQ[{a
, b, c, n}, x]

Rule 2341

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

Rule 2342

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))^(p_.)*((d_.)*(x_))^(m_.), x_Symbol] :> Simp[(d*x)^(m + 1)*((a + b*Lo
g[c*x^n])^p/(d*(m + 1))), x] - Dist[b*n*(p/(m + 1)), Int[(d*x)^m*(a + b*Log[c*x^n])^(p - 1), x], x] /; FreeQ[{
a, b, c, d, m, n}, x] && NeQ[m, -1] && GtQ[p, 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}{9} \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{x^2} \, dx \\ & = \frac {1}{9} \int \left (\frac {9 \left (-16+x^2\right )}{x^2}+\frac {60 (4+x) \log \left (\frac {14 x}{3}\right )}{x^2}-\frac {120 \log ^2\left (\frac {14 x}{3}\right )}{x^2}+\frac {100 \log ^3\left (\frac {14 x}{3}\right )}{x^2}-\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{x^2}\right ) \, dx \\ & = -\left (\frac {25}{9} \int \frac {\log ^4\left (\frac {14 x}{3}\right )}{x^2} \, dx\right )+\frac {20}{3} \int \frac {(4+x) \log \left (\frac {14 x}{3}\right )}{x^2} \, dx+\frac {100}{9} \int \frac {\log ^3\left (\frac {14 x}{3}\right )}{x^2} \, dx-\frac {40}{3} \int \frac {\log ^2\left (\frac {14 x}{3}\right )}{x^2} \, dx+\int \frac {-16+x^2}{x^2} \, dx \\ & = -\frac {80 \log \left (\frac {14 x}{3}\right )}{3 x}+\frac {20}{3} \log (x) \log \left (\frac {14 x}{3}\right )+\frac {40 \log ^2\left (\frac {14 x}{3}\right )}{3 x}-\frac {100 \log ^3\left (\frac {14 x}{3}\right )}{9 x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x}-\frac {20}{3} \int \frac {-4+x \log (x)}{x^2} \, dx-\frac {100}{9} \int \frac {\log ^3\left (\frac {14 x}{3}\right )}{x^2} \, dx-\frac {80}{3} \int \frac {\log \left (\frac {14 x}{3}\right )}{x^2} \, dx+\frac {100}{3} \int \frac {\log ^2\left (\frac {14 x}{3}\right )}{x^2} \, dx+\int \left (1-\frac {16}{x^2}\right ) \, dx \\ & = \frac {128}{3 x}+x+\frac {20}{3} \log (x) \log \left (\frac {14 x}{3}\right )-\frac {20 \log ^2\left (\frac {14 x}{3}\right )}{x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x}-\frac {20}{3} \int \left (-\frac {4}{x^2}+\frac {\log (x)}{x}\right ) \, dx-\frac {100}{3} \int \frac {\log ^2\left (\frac {14 x}{3}\right )}{x^2} \, dx+\frac {200}{3} \int \frac {\log \left (\frac {14 x}{3}\right )}{x^2} \, dx \\ & = -\frac {152}{3 x}+x-\frac {200 \log \left (\frac {14 x}{3}\right )}{3 x}+\frac {20}{3} \log (x) \log \left (\frac {14 x}{3}\right )+\frac {40 \log ^2\left (\frac {14 x}{3}\right )}{3 x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x}-\frac {20}{3} \int \frac {\log (x)}{x} \, dx-\frac {200}{3} \int \frac {\log \left (\frac {14 x}{3}\right )}{x^2} \, dx \\ & = \frac {16}{x}+x-\frac {10 \log ^2(x)}{3}+\frac {20}{3} \log (x) \log \left (\frac {14 x}{3}\right )+\frac {40 \log ^2\left (\frac {14 x}{3}\right )}{3 x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x} \\ \end{align*}

Mathematica [B] (verified)

Leaf count is larger than twice the leaf count of optimal. \(49\) vs. \(2(21)=42\).

Time = 0.02 (sec) , antiderivative size = 49, normalized size of antiderivative = 2.33 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=\frac {16}{x}+x+\frac {10}{3} \log ^2\left (\frac {14 x}{3}\right )+\frac {40 \log ^2\left (\frac {14 x}{3}\right )}{3 x}+\frac {25 \log ^4\left (\frac {14 x}{3}\right )}{9 x} \]

[In]

Integrate[(-144 + 9*x^2 + (240 + 60*x)*Log[(14*x)/3] - 120*Log[(14*x)/3]^2 + 100*Log[(14*x)/3]^3 - 25*Log[(14*
x)/3]^4)/(9*x^2),x]

[Out]

16/x + x + (10*Log[(14*x)/3]^2)/3 + (40*Log[(14*x)/3]^2)/(3*x) + (25*Log[(14*x)/3]^4)/(9*x)

Maple [A] (verified)

Time = 0.09 (sec) , antiderivative size = 35, normalized size of antiderivative = 1.67

method	result	size
norman	\(\frac {16+x^{2}+\frac {40 \ln \left (\frac {14 x}{3}\right )^{2}}{3}+\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}}{9}+\frac {10 x \ln \left (\frac {14 x}{3}\right )^{2}}{3}}{x}\)	\(35\)
risch	\(\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}}{9 x}+\frac {10 \left (4+x \right ) \ln \left (\frac {14 x}{3}\right )^{2}}{3 x}+\frac {x^{2}+16}{x}\)	\(36\)
derivativedivides	\(\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}}{9 x}+\frac {40 \ln \left (\frac {14 x}{3}\right )^{2}}{3 x}+\frac {16}{x}+\frac {10 \ln \left (\frac {14 x}{3}\right )^{2}}{3}+x\)	\(38\)
default	\(\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}}{9 x}+\frac {40 \ln \left (\frac {14 x}{3}\right )^{2}}{3 x}+\frac {16}{x}+\frac {10 \ln \left (\frac {14 x}{3}\right )^{2}}{3}+x\)	\(38\)
parallelrisch	\(\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}+144+30 x \ln \left (\frac {14 x}{3}\right )^{2}+9 x^{2}+120 \ln \left (\frac {14 x}{3}\right )^{2}}{9 x}\)	\(38\)
parts	\(\frac {25 \ln \left (\frac {14 x}{3}\right )^{4}}{9 x}+\frac {40 \ln \left (\frac {14 x}{3}\right )^{2}}{3 x}+\frac {16}{x}+\frac {10 \ln \left (\frac {14 x}{3}\right )^{2}}{3}+x\)	\(38\)

[In]

int(1/9*(-25*ln(14/3*x)^4+100*ln(14/3*x)^3-120*ln(14/3*x)^2+(60*x+240)*ln(14/3*x)+9*x^2-144)/x^2,x,method=_RET
URNVERBOSE)

[Out]

(16+x^2+40/3*ln(14/3*x)^2+25/9*ln(14/3*x)^4+10/3*x*ln(14/3*x)^2)/x

Fricas [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 31, normalized size of antiderivative = 1.48 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=\frac {25 \, \log \left (\frac {14}{3} \, x\right )^{4} + 30 \, {\left (x + 4\right )} \log \left (\frac {14}{3} \, x\right )^{2} + 9 \, x^{2} + 144}{9 \, x} \]

[In]

integrate(1/9*(-25*log(14/3*x)^4+100*log(14/3*x)^3-120*log(14/3*x)^2+(60*x+240)*log(14/3*x)+9*x^2-144)/x^2,x,
algorithm="fricas")

[Out]

1/9*(25*log(14/3*x)^4 + 30*(x + 4)*log(14/3*x)^2 + 9*x^2 + 144)/x

Sympy [A] (verification not implemented)

Time = 0.10 (sec) , antiderivative size = 34, normalized size of antiderivative = 1.62 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=x + \frac {\left (10 x + 40\right ) \log {\left (\frac {14 x}{3} \right )}^{2}}{3 x} + \frac {25 \log {\left (\frac {14 x}{3} \right )}^{4}}{9 x} + \frac {16}{x} \]

[In]

integrate(1/9*(-25*ln(14/3*x)**4+100*ln(14/3*x)**3-120*ln(14/3*x)**2+(60*x+240)*ln(14/3*x)+9*x**2-144)/x**2,x)

[Out]

x + (10*x + 40)*log(14*x/3)**2/(3*x) + 25*log(14*x/3)**4/(9*x) + 16/x

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 105 vs. \(2 (20) = 40\).

Time = 0.18 (sec) , antiderivative size = 105, normalized size of antiderivative = 5.00 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=\frac {10}{3} \, \log \left (\frac {14}{3} \, x\right )^{2} + x + \frac {25 \, {\left (\log \left (\frac {14}{3} \, x\right )^{4} + 4 \, \log \left (\frac {14}{3} \, x\right )^{3} + 12 \, \log \left (\frac {14}{3} \, x\right )^{2} + 24 \, \log \left (\frac {14}{3} \, x\right ) + 24\right )}}{9 \, x} - \frac {100 \, {\left (\log \left (\frac {14}{3} \, x\right )^{3} + 3 \, \log \left (\frac {14}{3} \, x\right )^{2} + 6 \, \log \left (\frac {14}{3} \, x\right ) + 6\right )}}{9 \, x} + \frac {40 \, {\left (\log \left (\frac {14}{3} \, x\right )^{2} + 2 \, \log \left (\frac {14}{3} \, x\right ) + 2\right )}}{3 \, x} - \frac {80 \, \log \left (\frac {14}{3} \, x\right )}{3 \, x} - \frac {32}{3 \, x} \]

[In]

integrate(1/9*(-25*log(14/3*x)^4+100*log(14/3*x)^3-120*log(14/3*x)^2+(60*x+240)*log(14/3*x)+9*x^2-144)/x^2,x,
algorithm="maxima")

[Out]

10/3*log(14/3*x)^2 + x + 25/9*(log(14/3*x)^4 + 4*log(14/3*x)^3 + 12*log(14/3*x)^2 + 24*log(14/3*x) + 24)/x - 1
00/9*(log(14/3*x)^3 + 3*log(14/3*x)^2 + 6*log(14/3*x) + 6)/x + 40/3*(log(14/3*x)^2 + 2*log(14/3*x) + 2)/x - 80
/3*log(14/3*x)/x - 32/3/x

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.57 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=\frac {10}{3} \, {\left (\frac {4}{x} + 1\right )} \log \left (\frac {14}{3} \, x\right )^{2} + \frac {25 \, \log \left (\frac {14}{3} \, x\right )^{4}}{9 \, x} + x + \frac {16}{x} \]

[In]

integrate(1/9*(-25*log(14/3*x)^4+100*log(14/3*x)^3-120*log(14/3*x)^2+(60*x+240)*log(14/3*x)+9*x^2-144)/x^2,x,
algorithm="giac")

[Out]

10/3*(4/x + 1)*log(14/3*x)^2 + 25/9*log(14/3*x)^4/x + x + 16/x

Mupad [B] (verification not implemented)

Time = 14.29 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.52 \[ \int \frac {-144+9 x^2+(240+60 x) \log \left (\frac {14 x}{3}\right )-120 \log ^2\left (\frac {14 x}{3}\right )+100 \log ^3\left (\frac {14 x}{3}\right )-25 \log ^4\left (\frac {14 x}{3}\right )}{9 x^2} \, dx=x+\frac {\frac {25\,{\ln \left (\frac {14\,x}{3}\right )}^4}{9}+\frac {40\,{\ln \left (\frac {14\,x}{3}\right )}^2}{3}+16}{x}+\frac {10\,{\ln \left (\frac {14\,x}{3}\right )}^2}{3} \]

[In]

int(-((40*log((14*x)/3)^2)/3 - (100*log((14*x)/3)^3)/9 + (25*log((14*x)/3)^4)/9 - x^2 - (log((14*x)/3)*(60*x +
240))/9 + 16)/x^2,x)

[Out]

x + ((40*log((14*x)/3)^2)/3 + (25*log((14*x)/3)^4)/9 + 16)/x + (10*log((14*x)/3)^2)/3