\(\int \frac {(9+e-x^2-18 x^4+8 x^5-7 x^8) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8)} \, dx\) [9704]

   Optimal result
   Rubi [F]
   Mathematica [A] (verified)
   Maple [A] (verified)
   Fricas [A] (verification not implemented)
   Sympy [A] (verification not implemented)
   Maxima [A] (verification not implemented)
   Giac [A] (verification not implemented)
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 127, antiderivative size = 24 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\frac {x (i \pi +\log (3))}{e+\left (3-x+x^4\right )^2} \]

[Out]

x/((x^4-x+3)^2+exp(1))*(ln(3)+I*Pi)

Rubi [F]

\[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx \]

[In]

Int[((9 + E - x^2 - 18*x^4 + 8*x^5 - 7*x^8)*(I*Pi + Log[3]))/(81 + E^2 - 108*x + 54*x^2 - 12*x^3 + 109*x^4 - 1
08*x^5 + 36*x^6 - 4*x^7 + 54*x^8 - 36*x^9 + 6*x^10 + 12*x^12 - 4*x^13 + x^16 + E*(18 - 12*x + 2*x^2 + 12*x^4 -
 4*x^5 + 2*x^8)),x]

[Out]

(-2*(9 + E)*(I*Pi + Log[3])*Defer[Int][(-3 + I*Sqrt[E] + x - x^4)^(-2), x])/E - (7*(I*Pi + Log[3])*Defer[Int][
(-3*I + Sqrt[E] + I*x - I*x^4)^(-1), x])/(2*Sqrt[E]) + (2*(9 + E)*(I*Pi + Log[3])*Defer[Int][(-3*I + Sqrt[E] +
 I*x - I*x^4)^(-1), x])/E^(3/2) - (7*(I*Pi + Log[3])*Defer[Int][(3*I + Sqrt[E] - I*x + I*x^4)^(-1), x])/(2*Sqr
t[E]) + (2*(9 + E)*(I*Pi + Log[3])*Defer[Int][(3*I + Sqrt[E] - I*x + I*x^4)^(-1), x])/E^(3/2) - (2*(9 + E)*(I*
Pi + Log[3])*Defer[Int][(3 + I*Sqrt[E] - x + x^4)^(-2), x])/E - 42*(I*Pi + Log[3])*Defer[Int][x/(E + (3 - x +
x^4)^2)^2, x] + 6*(I*Pi + Log[3])*Defer[Int][x^2/(E + (3 - x + x^4)^2)^2, x] + 24*(I*Pi + Log[3])*Defer[Int][x
^4/(E + (3 - x + x^4)^2)^2, x] - 6*(I*Pi + Log[3])*Defer[Int][x^5/(E + (3 - x + x^4)^2)^2, x]

Rubi steps \begin{align*} \text {integral}& = (i \pi +\log (3)) \int \frac {9+e-x^2-18 x^4+8 x^5-7 x^8}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx \\ & = (i \pi +\log (3)) \int \left (\frac {7}{-9 \left (1+\frac {e}{9}\right )+6 x-x^2-6 x^4+2 x^5-x^8}+\frac {2 \left (36 \left (1+\frac {e}{9}\right )-21 x+3 x^2+12 x^4-3 x^5\right )}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}\right ) \, dx \\ & = (2 (i \pi +\log (3))) \int \frac {36 \left (1+\frac {e}{9}\right )-21 x+3 x^2+12 x^4-3 x^5}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx+(7 (i \pi +\log (3))) \int \frac {1}{-9 \left (1+\frac {e}{9}\right )+6 x-x^2-6 x^4+2 x^5-x^8} \, dx \\ & = (2 (i \pi +\log (3))) \int \frac {4 e+3 \left (12-7 x+x^2+4 x^4-x^5\right )}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(7 (i \pi +\log (3))) \int \frac {1}{-e-\left (3-x+x^4\right )^2} \, dx \\ & = (2 (i \pi +\log (3))) \int \left (\frac {36 \left (1+\frac {e}{9}\right )}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}-\frac {21 x}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}+\frac {3 x^2}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}+\frac {12 x^4}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}-\frac {3 x^5}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2}\right ) \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {\sqrt {e}}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 e}-\frac {(7 (i \pi +\log (3))) \int \frac {\sqrt {e}}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 e} \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}+(8 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (9 \left (1+\frac {e}{9}\right )-6 x+x^2+6 x^4-2 x^5+x^8\right )^2} \, dx \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}+(8 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}+(8 (9+e) (i \pi +\log (3))) \int \left (-\frac {1}{4 e \left (-3+i \sqrt {e}+x-x^4\right )^2}-\frac {1}{4 e \left (3+i \sqrt {e}-x+x^4\right )^2}-\frac {1}{2 e \left (-e-\left (3-x+x^4\right )^2\right )}\right ) \, dx \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (-3+i \sqrt {e}+x-x^4\right )^2} \, dx}{e}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (3+i \sqrt {e}-x+x^4\right )^2} \, dx}{e}-\frac {(4 (9+e) (i \pi +\log (3))) \int \frac {1}{-e-\left (3-x+x^4\right )^2} \, dx}{e} \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}+\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {\sqrt {e}}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{e^2}+\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {\sqrt {e}}{3 i+\sqrt {e}-i x+i x^4} \, dx}{e^2}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (-3+i \sqrt {e}+x-x^4\right )^2} \, dx}{e}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (3+i \sqrt {e}-x+x^4\right )^2} \, dx}{e} \\ & = (6 (i \pi +\log (3))) \int \frac {x^2}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(6 (i \pi +\log (3))) \int \frac {x^5}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx+(24 (i \pi +\log (3))) \int \frac {x^4}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-(42 (i \pi +\log (3))) \int \frac {x}{\left (e+\left (3-x+x^4\right )^2\right )^2} \, dx-\frac {(7 (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{2 \sqrt {e}}-\frac {(7 (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{2 \sqrt {e}}+\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{-3 i+\sqrt {e}+i x-i x^4} \, dx}{e^{3/2}}+\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{3 i+\sqrt {e}-i x+i x^4} \, dx}{e^{3/2}}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (-3+i \sqrt {e}+x-x^4\right )^2} \, dx}{e}-\frac {(2 (9+e) (i \pi +\log (3))) \int \frac {1}{\left (3+i \sqrt {e}-x+x^4\right )^2} \, dx}{e} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.05 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.00 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\frac {x (i \pi +\log (3))}{e+\left (3-x+x^4\right )^2} \]

[In]

Integrate[((9 + E - x^2 - 18*x^4 + 8*x^5 - 7*x^8)*(I*Pi + Log[3]))/(81 + E^2 - 108*x + 54*x^2 - 12*x^3 + 109*x
^4 - 108*x^5 + 36*x^6 - 4*x^7 + 54*x^8 - 36*x^9 + 6*x^10 + 12*x^12 - 4*x^13 + x^16 + E*(18 - 12*x + 2*x^2 + 12
*x^4 - 4*x^5 + 2*x^8)),x]

[Out]

(x*(I*Pi + Log[3]))/(E + (3 - x + x^4)^2)

Maple [A] (verified)

Time = 2.12 (sec) , antiderivative size = 35, normalized size of antiderivative = 1.46

method result size
gosper \(\frac {\left (\ln \left (3\right )+i \pi \right ) x}{x^{8}-2 x^{5}+6 x^{4}+x^{2}+{\mathrm e}-6 x +9}\) \(35\)
norman \(\frac {\left (\ln \left (3\right )+i \pi \right ) x}{x^{8}-2 x^{5}+6 x^{4}+x^{2}+{\mathrm e}-6 x +9}\) \(35\)
risch \(\frac {\left (\ln \left (3\right )+i \pi \right ) x}{x^{8}-2 x^{5}+6 x^{4}+x^{2}+{\mathrm e}-6 x +9}\) \(35\)
parallelrisch \(\frac {\left (\ln \left (3\right )+i \pi \right ) x}{x^{8}-2 x^{5}+6 x^{4}+x^{2}+{\mathrm e}-6 x +9}\) \(35\)

[In]

int((exp(1)-7*x^8+8*x^5-18*x^4-x^2+9)*(ln(3)+I*Pi)/(exp(1)^2+(2*x^8-4*x^5+12*x^4+2*x^2-12*x+18)*exp(1)+x^16-4*
x^13+12*x^12+6*x^10-36*x^9+54*x^8-4*x^7+36*x^6-108*x^5+109*x^4-12*x^3+54*x^2-108*x+81),x,method=_RETURNVERBOSE
)

[Out]

(ln(3)+I*Pi)*x/(x^8-2*x^5+6*x^4+x^2+exp(1)-6*x+9)

Fricas [A] (verification not implemented)

none

Time = 0.30 (sec) , antiderivative size = 35, normalized size of antiderivative = 1.46 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\frac {i \, \pi x + x \log \left (3\right )}{x^{8} - 2 \, x^{5} + 6 \, x^{4} + x^{2} - 6 \, x + e + 9} \]

[In]

integrate((exp(1)-7*x^8+8*x^5-18*x^4-x^2+9)*(log(3)+I*pi)/(exp(1)^2+(2*x^8-4*x^5+12*x^4+2*x^2-12*x+18)*exp(1)+
x^16-4*x^13+12*x^12+6*x^10-36*x^9+54*x^8-4*x^7+36*x^6-108*x^5+109*x^4-12*x^3+54*x^2-108*x+81),x, algorithm="fr
icas")

[Out]

(I*pi*x + x*log(3))/(x^8 - 2*x^5 + 6*x^4 + x^2 - 6*x + e + 9)

Sympy [A] (verification not implemented)

Time = 152.56 (sec) , antiderivative size = 36, normalized size of antiderivative = 1.50 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=- \frac {x \left (- \log {\left (3 \right )} - i \pi \right )}{x^{8} - 2 x^{5} + 6 x^{4} + x^{2} - 6 x + e + 9} \]

[In]

integrate((exp(1)-7*x**8+8*x**5-18*x**4-x**2+9)*(ln(3)+I*pi)/(exp(1)**2+(2*x**8-4*x**5+12*x**4+2*x**2-12*x+18)
*exp(1)+x**16-4*x**13+12*x**12+6*x**10-36*x**9+54*x**8-4*x**7+36*x**6-108*x**5+109*x**4-12*x**3+54*x**2-108*x+
81),x)

[Out]

-x*(-log(3) - I*pi)/(x**8 - 2*x**5 + 6*x**4 + x**2 - 6*x + E + 9)

Maxima [A] (verification not implemented)

none

Time = 0.21 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.38 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\frac {{\left (i \, \pi + \log \left (3\right )\right )} x}{x^{8} - 2 \, x^{5} + 6 \, x^{4} + x^{2} - 6 \, x + e + 9} \]

[In]

integrate((exp(1)-7*x^8+8*x^5-18*x^4-x^2+9)*(log(3)+I*pi)/(exp(1)^2+(2*x^8-4*x^5+12*x^4+2*x^2-12*x+18)*exp(1)+
x^16-4*x^13+12*x^12+6*x^10-36*x^9+54*x^8-4*x^7+36*x^6-108*x^5+109*x^4-12*x^3+54*x^2-108*x+81),x, algorithm="ma
xima")

[Out]

(I*pi + log(3))*x/(x^8 - 2*x^5 + 6*x^4 + x^2 - 6*x + e + 9)

Giac [A] (verification not implemented)

none

Time = 0.34 (sec) , antiderivative size = 36, normalized size of antiderivative = 1.50 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=-\frac {{\left (-i \, \pi - \log \left (3\right )\right )} x}{x^{8} - 2 \, x^{5} + 6 \, x^{4} + x^{2} - 6 \, x + e + 9} \]

[In]

integrate((exp(1)-7*x^8+8*x^5-18*x^4-x^2+9)*(log(3)+I*pi)/(exp(1)^2+(2*x^8-4*x^5+12*x^4+2*x^2-12*x+18)*exp(1)+
x^16-4*x^13+12*x^12+6*x^10-36*x^9+54*x^8-4*x^7+36*x^6-108*x^5+109*x^4-12*x^3+54*x^2-108*x+81),x, algorithm="gi
ac")

[Out]

-(-I*pi - log(3))*x/(x^8 - 2*x^5 + 6*x^4 + x^2 - 6*x + e + 9)

Mupad [B] (verification not implemented)

Time = 27.89 (sec) , antiderivative size = 34, normalized size of antiderivative = 1.42 \[ \int \frac {\left (9+e-x^2-18 x^4+8 x^5-7 x^8\right ) (i \pi +\log (3))}{81+e^2-108 x+54 x^2-12 x^3+109 x^4-108 x^5+36 x^6-4 x^7+54 x^8-36 x^9+6 x^{10}+12 x^{12}-4 x^{13}+x^{16}+e \left (18-12 x+2 x^2+12 x^4-4 x^5+2 x^8\right )} \, dx=\frac {x\,\left (\ln \left (3\right )+\Pi \,1{}\mathrm {i}\right )}{x^8-2\,x^5+6\,x^4+x^2-6\,x+\mathrm {e}+9} \]

[In]

int(((Pi*1i + log(3))*(exp(1) - x^2 - 18*x^4 + 8*x^5 - 7*x^8 + 9))/(exp(2) - 108*x + exp(1)*(2*x^2 - 12*x + 12
*x^4 - 4*x^5 + 2*x^8 + 18) + 54*x^2 - 12*x^3 + 109*x^4 - 108*x^5 + 36*x^6 - 4*x^7 + 54*x^8 - 36*x^9 + 6*x^10 +
 12*x^12 - 4*x^13 + x^16 + 81),x)

[Out]

(x*(Pi*1i + log(3)))/(exp(1) - 6*x + x^2 + 6*x^4 - 2*x^5 + x^8 + 9)