Wolfram Mathematica Online Integrator
The world's only full-power integration solver
Integrate[d^x*x^3*Sin[x], x] ==
(d^x*(-(Cos[x]*(x*(-6 + x^2) - 6*(-4 + x^2)*Log[d] +
3*x*(4 + x^2)*Log[d]^2 - 12*(2 + x^2)*
Log[d]^3 + 3*x*(6 + x^2)*Log[d]^4 -
6*x^2*Log[d]^5 + x^3*Log[d]^6)) +
(3*(-2 + x^2) + x*(-18 + x^2)*Log[d] +
3*(12 + x^2)*Log[d]^2 + 3*x*(-4 + x^2)*
Log[d]^3 - 3*(2 + x^2)*Log[d]^4 +
3*x*(2 + x^2)*Log[d]^5 - 3*x^2*Log[d]^6 +
x^3*Log[d]^7)*Sin[x]))/(1 + Log[d]^2)^4
x 3 Integrate[d x Sin[x], x] ==
x 2 2
(d (-(Cos[x] (x (-6 + x ) - 6 (-4 + x ) Log[d] +
2 2
3 x (4 + x ) Log[d] -
2 3
12 (2 + x ) Log[d] +
2 4 2 5
3 x (6 + x ) Log[d] - 6 x Log[d] +
3 6
x Log[d] )) +
2 2
(3 (-2 + x ) + x (-18 + x ) Log[d] +
2 2
3 (12 + x ) Log[d] +
2 3 2 4
3 x (-4 + x ) Log[d] - 3 (2 + x ) Log[d] +
2 5 2 6
3 x (2 + x ) Log[d] - 3 x Log[d] +
3 7 2 4
x Log[d] ) Sin[x])) / (1 + Log[d] )
Time to compute: 0.35 second
Spread the word: