22.28 Problem number 5022

5005x2+125log(3)+(625125log(3))log(x)+(125+125log(x))log(log(x))25x2+10x3+x4+(1250x250x2+(250x50x2)log(3))log(x)+(15625+6250log(3)+625log2(3))log2(x)+((250x+50x2)log(x)+(62501250log(3))log2(x))log(log(x))+625log2(x)log2(log(x))dx

Optimal antiderivative xx(1+x5)+5(ln(ln(x))5ln(3))ln(x)

command

Integrate[(500 - 5*x^2 + 125*Log[3] + (-625 - 125*Log[3])*Log[x] + (-125 + 125*Log[x])*Log[Log[x]])/(25*x^2 + 10*x^3 + x^4 + (-1250*x - 250*x^2 + (-250*x - 50*x^2)*Log[3])*Log[x] + (15625 + 6250*Log[3] + 625*Log[3]^2)*Log[x]^2 + ((250*x + 50*x^2)*Log[x] + (-6250 - 1250*Log[3])*Log[x]^2)*Log[Log[x]] + 625*Log[x]^2*Log[Log[x]]^2),x]

Mathematica 13.1 output

5005x2+125log(3)+(625125log(3))log(x)+(125+125log(x))log(log(x))25x2+10x3+x4+(1250x250x2+(250x50x2)log(3))log(x)+(15625+6250log(3)+625log2(3))log2(x)+((250x+50x2)log(x)+(62501250log(3))log2(x))log(log(x))+625log2(x)log2(log(x))dx

Mathematica 12.3 output

5xx(5+x)+25log(x)(5+log(log(x)3))