3.1.80 \(\int \sqrt {d x} \operatorname {PolyLog}(3,a x^2) \, dx\) [80]

3.1.80.1 Optimal result
3.1.80.2 Mathematica [C] (verified)
3.1.80.3 Rubi [A] (verified)
3.1.80.4 Maple [A] (verified)
3.1.80.5 Fricas [C] (verification not implemented)
3.1.80.6 Sympy [F]
3.1.80.7 Maxima [A] (verification not implemented)
3.1.80.8 Giac [F]
3.1.80.9 Mupad [F(-1)]

3.1.80.1 Optimal result

Integrand size = 15, antiderivative size = 146 \[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\frac {128 (d x)^{3/2}}{81 d}+\frac {64 \sqrt {d} \arctan \left (\frac {\sqrt [4]{a} \sqrt {d x}}{\sqrt {d}}\right )}{27 a^{3/4}}-\frac {64 \sqrt {d} \text {arctanh}\left (\frac {\sqrt [4]{a} \sqrt {d x}}{\sqrt {d}}\right )}{27 a^{3/4}}-\frac {32 (d x)^{3/2} \log \left (1-a x^2\right )}{27 d}-\frac {8 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{9 d}+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d} \]

output
128/81*(d*x)^(3/2)/d-32/27*(d*x)^(3/2)*ln(-a*x^2+1)/d-8/9*(d*x)^(3/2)*poly 
log(2,a*x^2)/d+2/3*(d*x)^(3/2)*polylog(3,a*x^2)/d+64/27*arctan(a^(1/4)*(d* 
x)^(1/2)/d^(1/2))*d^(1/2)/a^(3/4)-64/27*arctanh(a^(1/4)*(d*x)^(1/2)/d^(1/2 
))*d^(1/2)/a^(3/4)
 
3.1.80.2 Mathematica [C] (verified)

Result contains higher order function than in optimal. Order 5 vs. order 4 in optimal.

Time = 0.09 (sec) , antiderivative size = 68, normalized size of antiderivative = 0.47 \[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=-\frac {7 x \sqrt {d x} \operatorname {Gamma}\left (\frac {7}{4}\right ) \left (-64+64 \operatorname {Hypergeometric2F1}\left (\frac {3}{4},1,\frac {7}{4},a x^2\right )+48 \log \left (1-a x^2\right )+36 \operatorname {PolyLog}\left (2,a x^2\right )-27 \operatorname {PolyLog}\left (3,a x^2\right )\right )}{162 \operatorname {Gamma}\left (\frac {11}{4}\right )} \]

input
Integrate[Sqrt[d*x]*PolyLog[3, a*x^2],x]
 
output
(-7*x*Sqrt[d*x]*Gamma[7/4]*(-64 + 64*Hypergeometric2F1[3/4, 1, 7/4, a*x^2] 
 + 48*Log[1 - a*x^2] + 36*PolyLog[2, a*x^2] - 27*PolyLog[3, a*x^2]))/(162* 
Gamma[11/4])
 
3.1.80.3 Rubi [A] (verified)

Time = 0.40 (sec) , antiderivative size = 175, normalized size of antiderivative = 1.20, number of steps used = 12, number of rules used = 11, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.733, Rules used = {7145, 7145, 25, 2905, 8, 262, 266, 27, 827, 218, 221}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx\)

\(\Big \downarrow \) 7145

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \int \sqrt {d x} \operatorname {PolyLog}\left (2,a x^2\right )dx\)

\(\Big \downarrow \) 7145

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}-\frac {4}{3} \int -\sqrt {d x} \log \left (1-a x^2\right )dx\right )\)

\(\Big \downarrow \) 25

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \int \sqrt {d x} \log \left (1-a x^2\right )dx+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 2905

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \int \frac {x (d x)^{3/2}}{1-a x^2}dx}{3 d}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 8

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \int \frac {(d x)^{5/2}}{1-a x^2}dx}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 262

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {d^2 \int \frac {\sqrt {d x}}{1-a x^2}dx}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 266

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {2 d \int \frac {d^3 x}{d^2-a d^2 x^2}d\sqrt {d x}}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 27

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {2 d^3 \int \frac {d x}{d^2-a d^2 x^2}d\sqrt {d x}}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 827

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {2 d^3 \left (\frac {\int \frac {1}{d-\sqrt {a} d x}d\sqrt {d x}}{2 \sqrt {a}}-\frac {\int \frac {1}{\sqrt {a} x d+d}d\sqrt {d x}}{2 \sqrt {a}}\right )}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 218

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {2 d^3 \left (\frac {\int \frac {1}{d-\sqrt {a} d x}d\sqrt {d x}}{2 \sqrt {a}}-\frac {\arctan \left (\frac {\sqrt [4]{a} \sqrt {d x}}{\sqrt {d}}\right )}{2 a^{3/4} \sqrt {d}}\right )}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

\(\Big \downarrow \) 221

\(\displaystyle \frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (3,a x^2\right )}{3 d}-\frac {4}{3} \left (\frac {4}{3} \left (\frac {4 a \left (\frac {2 d^3 \left (\frac {\text {arctanh}\left (\frac {\sqrt [4]{a} \sqrt {d x}}{\sqrt {d}}\right )}{2 a^{3/4} \sqrt {d}}-\frac {\arctan \left (\frac {\sqrt [4]{a} \sqrt {d x}}{\sqrt {d}}\right )}{2 a^{3/4} \sqrt {d}}\right )}{a}-\frac {2 d (d x)^{3/2}}{3 a}\right )}{3 d^2}+\frac {2 (d x)^{3/2} \log \left (1-a x^2\right )}{3 d}\right )+\frac {2 (d x)^{3/2} \operatorname {PolyLog}\left (2,a x^2\right )}{3 d}\right )\)

input
Int[Sqrt[d*x]*PolyLog[3, a*x^2],x]
 
output
(-4*((4*((4*a*((-2*d*(d*x)^(3/2))/(3*a) + (2*d^3*(-1/2*ArcTan[(a^(1/4)*Sqr 
t[d*x])/Sqrt[d]]/(a^(3/4)*Sqrt[d]) + ArcTanh[(a^(1/4)*Sqrt[d*x])/Sqrt[d]]/ 
(2*a^(3/4)*Sqrt[d])))/a))/(3*d^2) + (2*(d*x)^(3/2)*Log[1 - a*x^2])/(3*d))) 
/3 + (2*(d*x)^(3/2)*PolyLog[2, a*x^2])/(3*d)))/3 + (2*(d*x)^(3/2)*PolyLog[ 
3, a*x^2])/(3*d)
 

3.1.80.3.1 Defintions of rubi rules used

rule 8
Int[(u_.)*(x_)^(m_.)*((a_.)*(x_))^(p_), x_Symbol] :> Simp[1/a^m   Int[u*(a* 
x)^(m + p), x], x] /; FreeQ[{a, m, p}, x] && IntegerQ[m]
 

rule 25
Int[-(Fx_), x_Symbol] :> Simp[Identity[-1]   Int[Fx, x], x]
 

rule 27
Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 218
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(Rt[a/b, 2]/a)*ArcTan[x/R 
t[a/b, 2]], x] /; FreeQ[{a, b}, x] && PosQ[a/b]
 

rule 221
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(Rt[-a/b, 2]/a)*ArcTanh[x 
/Rt[-a/b, 2]], x] /; FreeQ[{a, b}, x] && NegQ[a/b]
 

rule 262
Int[((c_.)*(x_))^(m_)*((a_) + (b_.)*(x_)^2)^(p_), x_Symbol] :> Simp[c*(c*x) 
^(m - 1)*((a + b*x^2)^(p + 1)/(b*(m + 2*p + 1))), x] - Simp[a*c^2*((m - 1)/ 
(b*(m + 2*p + 1)))   Int[(c*x)^(m - 2)*(a + b*x^2)^p, x], x] /; FreeQ[{a, b 
, c, p}, x] && GtQ[m, 2 - 1] && NeQ[m + 2*p + 1, 0] && IntBinomialQ[a, b, c 
, 2, m, p, x]
 

rule 266
Int[((c_.)*(x_))^(m_)*((a_) + (b_.)*(x_)^2)^(p_), x_Symbol] :> With[{k = De 
nominator[m]}, Simp[k/c   Subst[Int[x^(k*(m + 1) - 1)*(a + b*(x^(2*k)/c^2)) 
^p, x], x, (c*x)^(1/k)], x]] /; FreeQ[{a, b, c, p}, x] && FractionQ[m] && I 
ntBinomialQ[a, b, c, 2, m, p, x]
 

rule 827
Int[(x_)^2/((a_) + (b_.)*(x_)^4), x_Symbol] :> With[{r = Numerator[Rt[-a/b, 
 2]], s = Denominator[Rt[-a/b, 2]]}, Simp[s/(2*b)   Int[1/(r + s*x^2), x], 
x] - Simp[s/(2*b)   Int[1/(r - s*x^2), x], x]] /; FreeQ[{a, b}, x] &&  !GtQ 
[a/b, 0]
 

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

rule 7145
Int[((d_.)*(x_))^(m_.)*PolyLog[n_, (a_.)*((b_.)*(x_)^(p_.))^(q_.)], x_Symbo 
l] :> Simp[(d*x)^(m + 1)*(PolyLog[n, a*(b*x^p)^q]/(d*(m + 1))), x] - Simp[p 
*(q/(m + 1))   Int[(d*x)^m*PolyLog[n - 1, a*(b*x^p)^q], x], x] /; FreeQ[{a, 
 b, d, m, p, q}, x] && NeQ[m, -1] && GtQ[n, 0]
 
3.1.80.4 Maple [A] (verified)

Time = 0.17 (sec) , antiderivative size = 147, normalized size of antiderivative = 1.01

method result size
meijerg \(-\frac {\sqrt {d x}\, \left (\frac {256 x^{\frac {3}{2}} \left (-a \right )^{\frac {7}{4}}}{81 a}+\frac {64 x^{\frac {3}{2}} \left (-a \right )^{\frac {7}{4}} \left (\ln \left (1-\left (a \,x^{2}\right )^{\frac {1}{4}}\right )-\ln \left (1+\left (a \,x^{2}\right )^{\frac {1}{4}}\right )+2 \arctan \left (\left (a \,x^{2}\right )^{\frac {1}{4}}\right )\right )}{27 a \left (a \,x^{2}\right )^{\frac {3}{4}}}-\frac {64 x^{\frac {3}{2}} \left (-a \right )^{\frac {7}{4}} \ln \left (-a \,x^{2}+1\right )}{27 a}-\frac {16 x^{\frac {3}{2}} \left (-a \right )^{\frac {7}{4}} \operatorname {polylog}\left (2, a \,x^{2}\right )}{9 a}+\frac {4 x^{\frac {3}{2}} \left (-a \right )^{\frac {7}{4}} \operatorname {polylog}\left (3, a \,x^{2}\right )}{3 a}\right )}{2 \sqrt {x}\, \left (-a \right )^{\frac {3}{4}}}\) \(147\)

input
int((d*x)^(1/2)*polylog(3,a*x^2),x,method=_RETURNVERBOSE)
 
output
-1/2*(d*x)^(1/2)/x^(1/2)/(-a)^(3/4)*(256/81*x^(3/2)*(-a)^(7/4)/a+64/27*x^( 
3/2)*(-a)^(7/4)/a/(a*x^2)^(3/4)*(ln(1-(a*x^2)^(1/4))-ln(1+(a*x^2)^(1/4))+2 
*arctan((a*x^2)^(1/4)))-64/27*x^(3/2)*(-a)^(7/4)*ln(-a*x^2+1)/a-16/9*x^(3/ 
2)*(-a)^(7/4)/a*polylog(2,a*x^2)+4/3*x^(3/2)*(-a)^(7/4)/a*polylog(3,a*x^2) 
)
 
3.1.80.5 Fricas [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.27 (sec) , antiderivative size = 188, normalized size of antiderivative = 1.29 \[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\frac {2}{3} \, \sqrt {d x} x {\rm polylog}\left (3, a x^{2}\right ) - \frac {8}{81} \, \sqrt {d x} {\left (9 \, x {\rm Li}_2\left (a x^{2}\right ) + 12 \, x \log \left (-a x^{2} + 1\right ) - 16 \, x\right )} - \frac {32}{27} \, \left (\frac {d^{2}}{a^{3}}\right )^{\frac {1}{4}} \log \left (32768 \, a^{2} \left (\frac {d^{2}}{a^{3}}\right )^{\frac {3}{4}} + 32768 \, \sqrt {d x} d\right ) + \frac {32}{27} i \, \left (\frac {d^{2}}{a^{3}}\right )^{\frac {1}{4}} \log \left (32768 i \, a^{2} \left (\frac {d^{2}}{a^{3}}\right )^{\frac {3}{4}} + 32768 \, \sqrt {d x} d\right ) - \frac {32}{27} i \, \left (\frac {d^{2}}{a^{3}}\right )^{\frac {1}{4}} \log \left (-32768 i \, a^{2} \left (\frac {d^{2}}{a^{3}}\right )^{\frac {3}{4}} + 32768 \, \sqrt {d x} d\right ) + \frac {32}{27} \, \left (\frac {d^{2}}{a^{3}}\right )^{\frac {1}{4}} \log \left (-32768 \, a^{2} \left (\frac {d^{2}}{a^{3}}\right )^{\frac {3}{4}} + 32768 \, \sqrt {d x} d\right ) \]

input
integrate((d*x)^(1/2)*polylog(3,a*x^2),x, algorithm="fricas")
 
output
2/3*sqrt(d*x)*x*polylog(3, a*x^2) - 8/81*sqrt(d*x)*(9*x*dilog(a*x^2) + 12* 
x*log(-a*x^2 + 1) - 16*x) - 32/27*(d^2/a^3)^(1/4)*log(32768*a^2*(d^2/a^3)^ 
(3/4) + 32768*sqrt(d*x)*d) + 32/27*I*(d^2/a^3)^(1/4)*log(32768*I*a^2*(d^2/ 
a^3)^(3/4) + 32768*sqrt(d*x)*d) - 32/27*I*(d^2/a^3)^(1/4)*log(-32768*I*a^2 
*(d^2/a^3)^(3/4) + 32768*sqrt(d*x)*d) + 32/27*(d^2/a^3)^(1/4)*log(-32768*a 
^2*(d^2/a^3)^(3/4) + 32768*sqrt(d*x)*d)
 
3.1.80.6 Sympy [F]

\[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\int \sqrt {d x} \operatorname {Li}_{3}\left (a x^{2}\right )\, dx \]

input
integrate((d*x)**(1/2)*polylog(3,a*x**2),x)
 
output
Integral(sqrt(d*x)*polylog(3, a*x**2), x)
 
3.1.80.7 Maxima [A] (verification not implemented)

Time = 0.28 (sec) , antiderivative size = 153, normalized size of antiderivative = 1.05 \[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\frac {2 \, {\left (48 \, d^{2} {\left (\frac {2 \, \arctan \left (\frac {\sqrt {d x} \sqrt {a}}{\sqrt {\sqrt {a} d}}\right )}{\sqrt {\sqrt {a} d} \sqrt {a}} + \frac {\log \left (\frac {\sqrt {d x} \sqrt {a} - \sqrt {\sqrt {a} d}}{\sqrt {d x} \sqrt {a} + \sqrt {\sqrt {a} d}}\right )}{\sqrt {\sqrt {a} d} \sqrt {a}}\right )} + 32 \, \left (d x\right )^{\frac {3}{2}} {\left (3 \, \log \left (d\right ) + 2\right )} - 36 \, \left (d x\right )^{\frac {3}{2}} {\rm Li}_2\left (a x^{2}\right ) - 48 \, \left (d x\right )^{\frac {3}{2}} \log \left (-a d^{2} x^{2} + d^{2}\right ) + 27 \, \left (d x\right )^{\frac {3}{2}} {\rm Li}_{3}(a x^{2})\right )}}{81 \, d} \]

input
integrate((d*x)^(1/2)*polylog(3,a*x^2),x, algorithm="maxima")
 
output
2/81*(48*d^2*(2*arctan(sqrt(d*x)*sqrt(a)/sqrt(sqrt(a)*d))/(sqrt(sqrt(a)*d) 
*sqrt(a)) + log((sqrt(d*x)*sqrt(a) - sqrt(sqrt(a)*d))/(sqrt(d*x)*sqrt(a) + 
 sqrt(sqrt(a)*d)))/(sqrt(sqrt(a)*d)*sqrt(a))) + 32*(d*x)^(3/2)*(3*log(d) + 
 2) - 36*(d*x)^(3/2)*dilog(a*x^2) - 48*(d*x)^(3/2)*log(-a*d^2*x^2 + d^2) + 
 27*(d*x)^(3/2)*polylog(3, a*x^2))/d
 
3.1.80.8 Giac [F]

\[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\int { \sqrt {d x} {\rm Li}_{3}(a x^{2}) \,d x } \]

input
integrate((d*x)^(1/2)*polylog(3,a*x^2),x, algorithm="giac")
 
output
integrate(sqrt(d*x)*polylog(3, a*x^2), x)
 
3.1.80.9 Mupad [F(-1)]

Timed out. \[ \int \sqrt {d x} \operatorname {PolyLog}\left (3,a x^2\right ) \, dx=\int \mathrm {polylog}\left (3,a\,x^2\right )\,\sqrt {d\,x} \,d x \]

input
int(polylog(3, a*x^2)*(d*x)^(1/2),x)
 
output
int(polylog(3, a*x^2)*(d*x)^(1/2), x)