\(\int d^x \sin (x) \, dx\) [134]

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

Optimal result

Integrand size = 6, antiderivative size = 32 \[ \int d^x \sin (x) \, dx=-\frac {d^x \cos (x)}{1+\log ^2(d)}+\frac {d^x \log (d) \sin (x)}{1+\log ^2(d)} \]

[Out]

-d^x*cos(x)/(1+ln(d)^2)+d^x*ln(d)*sin(x)/(1+ln(d)^2)

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.00, number of steps used = 1, number of rules used = 1, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.167, Rules used = {4517} \[ \int d^x \sin (x) \, dx=\frac {d^x \log (d) \sin (x)}{\log ^2(d)+1}-\frac {d^x \cos (x)}{\log ^2(d)+1} \]

[In]

Int[d^x*Sin[x],x]

[Out]

-((d^x*Cos[x])/(1 + Log[d]^2)) + (d^x*Log[d]*Sin[x])/(1 + Log[d]^2)

Rule 4517

Int[(F_)^((c_.)*((a_.) + (b_.)*(x_)))*Sin[(d_.) + (e_.)*(x_)], x_Symbol] :> Simp[b*c*Log[F]*F^(c*(a + b*x))*(S
in[d + e*x]/(e^2 + b^2*c^2*Log[F]^2)), x] - Simp[e*F^(c*(a + b*x))*(Cos[d + e*x]/(e^2 + b^2*c^2*Log[F]^2)), x]
 /; FreeQ[{F, a, b, c, d, e}, x] && NeQ[e^2 + b^2*c^2*Log[F]^2, 0]

Rubi steps \begin{align*} \text {integral}& = -\frac {d^x \cos (x)}{1+\log ^2(d)}+\frac {d^x \log (d) \sin (x)}{1+\log ^2(d)} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.02 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.69 \[ \int d^x \sin (x) \, dx=\frac {d^x (-\cos (x)+\log (d) \sin (x))}{1+\log ^2(d)} \]

[In]

Integrate[d^x*Sin[x],x]

[Out]

(d^x*(-Cos[x] + Log[d]*Sin[x]))/(1 + Log[d]^2)

Maple [A] (verified)

Time = 0.13 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.72

method result size
parallelrisch \(\frac {d^{x} \left (\ln \left (d \right ) \sin \left (x \right )-\cos \left (x \right )\right )}{1+\ln \left (d \right )^{2}}\) \(23\)
risch \(-\frac {d^{x} \cos \left (x \right )}{1+\ln \left (d \right )^{2}}+\frac {d^{x} \ln \left (d \right ) \sin \left (x \right )}{1+\ln \left (d \right )^{2}}\) \(33\)
norman \(\frac {\frac {{\mathrm e}^{x \ln \left (d \right )} \left (\tan ^{2}\left (\frac {x}{2}\right )\right )}{1+\ln \left (d \right )^{2}}-\frac {{\mathrm e}^{x \ln \left (d \right )}}{1+\ln \left (d \right )^{2}}+\frac {2 \ln \left (d \right ) {\mathrm e}^{x \ln \left (d \right )} \tan \left (\frac {x}{2}\right )}{1+\ln \left (d \right )^{2}}}{1+\tan ^{2}\left (\frac {x}{2}\right )}\) \(69\)

[In]

int(d^x*sin(x),x,method=_RETURNVERBOSE)

[Out]

d^x*(ln(d)*sin(x)-cos(x))/(1+ln(d)^2)

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.69 \[ \int d^x \sin (x) \, dx=\frac {{\left (\log \left (d\right ) \sin \left (x\right ) - \cos \left (x\right )\right )} d^{x}}{\log \left (d\right )^{2} + 1} \]

[In]

integrate(d^x*sin(x),x, algorithm="fricas")

[Out]

(log(d)*sin(x) - cos(x))*d^x/(log(d)^2 + 1)

Sympy [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.31 (sec) , antiderivative size = 104, normalized size of antiderivative = 3.25 \[ \int d^x \sin (x) \, dx=\begin {cases} \frac {x e^{- i x} \sin {\left (x \right )}}{2} - \frac {i x e^{- i x} \cos {\left (x \right )}}{2} - \frac {e^{- i x} \cos {\left (x \right )}}{2} & \text {for}\: d = e^{- i} \\\frac {x e^{i x} \sin {\left (x \right )}}{2} + \frac {i x e^{i x} \cos {\left (x \right )}}{2} - \frac {e^{i x} \cos {\left (x \right )}}{2} & \text {for}\: d = e^{i} \\\frac {d^{x} \log {\left (d \right )} \sin {\left (x \right )}}{\log {\left (d \right )}^{2} + 1} - \frac {d^{x} \cos {\left (x \right )}}{\log {\left (d \right )}^{2} + 1} & \text {otherwise} \end {cases} \]

[In]

integrate(d**x*sin(x),x)

[Out]

Piecewise((x*exp(-I*x)*sin(x)/2 - I*x*exp(-I*x)*cos(x)/2 - exp(-I*x)*cos(x)/2, Eq(d, exp(-I))), (x*exp(I*x)*si
n(x)/2 + I*x*exp(I*x)*cos(x)/2 - exp(I*x)*cos(x)/2, Eq(d, exp(I))), (d**x*log(d)*sin(x)/(log(d)**2 + 1) - d**x
*cos(x)/(log(d)**2 + 1), True))

Maxima [A] (verification not implemented)

none

Time = 0.20 (sec) , antiderivative size = 25, normalized size of antiderivative = 0.78 \[ \int d^x \sin (x) \, dx=\frac {d^{x} \log \left (d\right ) \sin \left (x\right ) - d^{x} \cos \left (x\right )}{\log \left (d\right )^{2} + 1} \]

[In]

integrate(d^x*sin(x),x, algorithm="maxima")

[Out]

(d^x*log(d)*sin(x) - d^x*cos(x))/(log(d)^2 + 1)

Giac [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.30 (sec) , antiderivative size = 328, normalized size of antiderivative = 10.25 \[ \int d^x \sin (x) \, dx={\left | d \right |}^{x} {\left (\frac {{\left (\pi - \pi \mathrm {sgn}\left (d\right ) - 2\right )} \cos \left (\frac {1}{2} \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} \, \pi x + x\right )}{{\left (\pi - \pi \mathrm {sgn}\left (d\right ) - 2\right )}^{2} + 4 \, \log \left ({\left | d \right |}\right )^{2}} + \frac {2 \, \log \left ({\left | d \right |}\right ) \sin \left (\frac {1}{2} \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} \, \pi x + x\right )}{{\left (\pi - \pi \mathrm {sgn}\left (d\right ) - 2\right )}^{2} + 4 \, \log \left ({\left | d \right |}\right )^{2}}\right )} - {\left | d \right |}^{x} {\left (\frac {{\left (\pi - \pi \mathrm {sgn}\left (d\right ) + 2\right )} \cos \left (\frac {1}{2} \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} \, \pi x - x\right )}{{\left (\pi - \pi \mathrm {sgn}\left (d\right ) + 2\right )}^{2} + 4 \, \log \left ({\left | d \right |}\right )^{2}} + \frac {2 \, \log \left ({\left | d \right |}\right ) \sin \left (\frac {1}{2} \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} \, \pi x - x\right )}{{\left (\pi - \pi \mathrm {sgn}\left (d\right ) + 2\right )}^{2} + 4 \, \log \left ({\left | d \right |}\right )^{2}}\right )} - {\left | d \right |}^{x} {\left (-\frac {i \, e^{\left (\frac {1}{2} i \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} i \, \pi x + i \, x\right )}}{-2 i \, \pi + 2 i \, \pi \mathrm {sgn}\left (d\right ) + 4 \, \log \left ({\left | d \right |}\right ) + 4 i} - \frac {i \, e^{\left (-\frac {1}{2} i \, \pi x \mathrm {sgn}\left (d\right ) + \frac {1}{2} i \, \pi x - i \, x\right )}}{2 i \, \pi - 2 i \, \pi \mathrm {sgn}\left (d\right ) + 4 \, \log \left ({\left | d \right |}\right ) - 4 i}\right )} - {\left | d \right |}^{x} {\left (\frac {i \, e^{\left (\frac {1}{2} i \, \pi x \mathrm {sgn}\left (d\right ) - \frac {1}{2} i \, \pi x - i \, x\right )}}{-2 i \, \pi + 2 i \, \pi \mathrm {sgn}\left (d\right ) + 4 \, \log \left ({\left | d \right |}\right ) - 4 i} + \frac {i \, e^{\left (-\frac {1}{2} i \, \pi x \mathrm {sgn}\left (d\right ) + \frac {1}{2} i \, \pi x + i \, x\right )}}{2 i \, \pi - 2 i \, \pi \mathrm {sgn}\left (d\right ) + 4 \, \log \left ({\left | d \right |}\right ) + 4 i}\right )} \]

[In]

integrate(d^x*sin(x),x, algorithm="giac")

[Out]

abs(d)^x*((pi - pi*sgn(d) - 2)*cos(1/2*pi*x*sgn(d) - 1/2*pi*x + x)/((pi - pi*sgn(d) - 2)^2 + 4*log(abs(d))^2)
+ 2*log(abs(d))*sin(1/2*pi*x*sgn(d) - 1/2*pi*x + x)/((pi - pi*sgn(d) - 2)^2 + 4*log(abs(d))^2)) - abs(d)^x*((p
i - pi*sgn(d) + 2)*cos(1/2*pi*x*sgn(d) - 1/2*pi*x - x)/((pi - pi*sgn(d) + 2)^2 + 4*log(abs(d))^2) + 2*log(abs(
d))*sin(1/2*pi*x*sgn(d) - 1/2*pi*x - x)/((pi - pi*sgn(d) + 2)^2 + 4*log(abs(d))^2)) - abs(d)^x*(-I*e^(1/2*I*pi
*x*sgn(d) - 1/2*I*pi*x + I*x)/(-2*I*pi + 2*I*pi*sgn(d) + 4*log(abs(d)) + 4*I) - I*e^(-1/2*I*pi*x*sgn(d) + 1/2*
I*pi*x - I*x)/(2*I*pi - 2*I*pi*sgn(d) + 4*log(abs(d)) - 4*I)) - abs(d)^x*(I*e^(1/2*I*pi*x*sgn(d) - 1/2*I*pi*x
- I*x)/(-2*I*pi + 2*I*pi*sgn(d) + 4*log(abs(d)) - 4*I) + I*e^(-1/2*I*pi*x*sgn(d) + 1/2*I*pi*x + I*x)/(2*I*pi -
 2*I*pi*sgn(d) + 4*log(abs(d)) + 4*I))

Mupad [B] (verification not implemented)

Time = 0.03 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.69 \[ \int d^x \sin (x) \, dx=-\frac {d^x\,\left (\cos \left (x\right )-\ln \left (d\right )\,\sin \left (x\right )\right )}{{\ln \left (d\right )}^2+1} \]

[In]

int(d^x*sin(x),x)

[Out]

-(d^x*(cos(x) - log(d)*sin(x)))/(log(d)^2 + 1)