22.54 Problem number 10072

700+e125(125+145x16x2+25xlog(3x))(25170x+32x225xlog(3x))196001400e125(125+145x16x2+25xlog(3x))+25e225(125+145x16x2+25xlog(3x))dx

Optimal antiderivative xex+4+xln(3x)(4x53)228

command

Integrate[(-700 + E^((-125 + 145*x - 16*x^2 + 25*x*Log[3*x])/25)*(25 - 170*x + 32*x^2 - 25*x*Log[3*x]))/(19600 - 1400*E^((-125 + 145*x - 16*x^2 + 25*x*Log[3*x])/25) + 25*E^((2*(-125 + 145*x - 16*x^2 + 25*x*Log[3*x]))/25)),x]

Mathematica 13.1 output

700+e125(125+145x16x2+25xlog(3x))(25170x+32x225xlog(3x))196001400e125(125+145x16x2+25xlog(3x))+25e225(125+145x16x2+25xlog(3x))dx

Mathematica 12.3 output

e5+16x225x28e5+16x2253xe29x/5xx