3.64.27 \(\int \frac {e^{\frac {e^{\frac {1}{4} (-3+x+16 \log (2))}+9 x-\log (\frac {x}{3})}{3 x}} (-4+e^{\frac {1}{4} (-3+x+16 \log (2))} (-4+x)+4 \log (\frac {x}{3}))}{4 x^2} \, dx\)

Optimal. Leaf size=35 \[ 3 \left (-4+e^{3+\frac {16 e^{\frac {1}{4} (-3+x)}-\log \left (\frac {x}{3}\right )}{3 x}}\right ) \]

________________________________________________________________________________________

Rubi [A]  time = 1.13, antiderivative size = 45, normalized size of antiderivative = 1.29, number of steps used = 2, number of rules used = 2, integrand size = 68, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.029, Rules used = {12, 6706} \begin {gather*} 3^{\frac {1}{3 x}+1} e^{\frac {9 x+16 e^{\frac {x-3}{4}}}{3 x}} x^{\left .-\frac {1}{3}\right /x} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(E^((E^((-3 + x + 16*Log[2])/4) + 9*x - Log[x/3])/(3*x))*(-4 + E^((-3 + x + 16*Log[2])/4)*(-4 + x) + 4*Log
[x/3]))/(4*x^2),x]

[Out]

(3^(1 + 1/(3*x))*E^((16*E^((-3 + x)/4) + 9*x)/(3*x)))/x^(1/(3*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 6706

Int[(F_)^(v_)*(u_), x_Symbol] :> With[{q = DerivativeDivides[v, u, x]}, Simp[(q*F^v)/Log[F], x] /;  !FalseQ[q]
] /; FreeQ[F, x]

Rubi steps

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

________________________________________________________________________________________

Mathematica [F]  time = 2.23, size = 71, normalized size = 2.03 \begin {gather*} \frac {1}{4} \int \frac {e^{\frac {e^{\frac {1}{4} (-3+x+16 \log (2))}+9 x-\log \left (\frac {x}{3}\right )}{3 x}} \left (-4+e^{\frac {1}{4} (-3+x+16 \log (2))} (-4+x)+4 \log \left (\frac {x}{3}\right )\right )}{x^2} \, dx \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(E^((E^((-3 + x + 16*Log[2])/4) + 9*x - Log[x/3])/(3*x))*(-4 + E^((-3 + x + 16*Log[2])/4)*(-4 + x) +
 4*Log[x/3]))/(4*x^2),x]

[Out]

Integrate[(E^((E^((-3 + x + 16*Log[2])/4) + 9*x - Log[x/3])/(3*x))*(-4 + E^((-3 + x + 16*Log[2])/4)*(-4 + x) +
 4*Log[x/3]))/x^2, x]/4

________________________________________________________________________________________

fricas [A]  time = 0.59, size = 28, normalized size = 0.80 \begin {gather*} 3 \, e^{\left (\frac {9 \, x + e^{\left (\frac {1}{4} \, x + 4 \, \log \relax (2) - \frac {3}{4}\right )} - \log \left (\frac {1}{3} \, x\right )}{3 \, x}\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

giac [A]  time = 0.23, size = 29, normalized size = 0.83 \begin {gather*} 3 \, e^{\left (\frac {e^{\left (\frac {1}{4} \, x + 4 \, \log \relax (2) - \frac {3}{4}\right )}}{3 \, x} - \frac {\log \left (\frac {1}{3} \, x\right )}{3 \, x} + 3\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maple [A]  time = 0.05, size = 27, normalized size = 0.77




method result size



risch \(3 \,{\mathrm e}^{\frac {-\ln \left (\frac {x}{3}\right )+16 \,{\mathrm e}^{\frac {x}{4}-\frac {3}{4}}+9 x}{3 x}}\) \(27\)



Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

3*exp(1/3*(-ln(1/3*x)+16*exp(1/4*x-3/4)+9*x)/x)

________________________________________________________________________________________

maxima [A]  time = 0.65, size = 30, normalized size = 0.86 \begin {gather*} 3 \, e^{\left (\frac {16 \, e^{\left (\frac {1}{4} \, x - \frac {3}{4}\right )}}{3 \, x} + \frac {\log \relax (3)}{3 \, x} - \frac {\log \relax (x)}{3 \, x} + 3\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 4.37, size = 33, normalized size = 0.94 \begin {gather*} \frac {3^{\frac {1}{3\,x}+1}\,{\mathrm {e}}^{\frac {16\,{\mathrm {e}}^{x/4}\,{\mathrm {e}}^{-\frac {3}{4}}}{3\,x}+3}}{x^{\frac {1}{3\,x}}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((exp((3*x - log(x/3)/3 + exp(x/4 + 4*log(2) - 3/4)/3)/x)*(4*log(x/3) + exp(x/4 + 4*log(2) - 3/4)*(x - 4) -
 4))/(4*x^2),x)

[Out]

(3^(1/(3*x) + 1)*exp((16*exp(x/4)*exp(-3/4))/(3*x) + 3))/x^(1/(3*x))

________________________________________________________________________________________

sympy [A]  time = 0.51, size = 26, normalized size = 0.74 \begin {gather*} 3 e^{\frac {3 x + \frac {16 e^{\frac {x}{4} - \frac {3}{4}}}{3} - \frac {\log {\left (\frac {x}{3} \right )}}{3}}{x}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/4*(4*ln(1/3*x)+(x-4)*exp(4*ln(2)+1/4*x-3/4)-4)*exp(1/3*(-ln(1/3*x)+exp(4*ln(2)+1/4*x-3/4)+9*x)/x)/
x**2,x)

[Out]

3*exp((3*x + 16*exp(x/4 - 3/4)/3 - log(x/3)/3)/x)

________________________________________________________________________________________