3.476 \(\int \frac{2^{2 x}}{a-2^x b} \, dx\)

Optimal. Leaf size=32 \[ -\frac{a \log \left (a-b 2^x\right )}{b^2 \log (2)}-\frac{2^x}{b \log (2)} \]

[Out]

-(2^x/(b*Log[2])) - (a*Log[a - 2^x*b])/(b^2*Log[2])

________________________________________________________________________________________

Rubi [A]  time = 0.0354631, antiderivative size = 32, normalized size of antiderivative = 1., number of steps used = 3, number of rules used = 2, integrand size = 16, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.125, Rules used = {2248, 43} \[ -\frac{a \log \left (a-b 2^x\right )}{b^2 \log (2)}-\frac{2^x}{b \log (2)} \]

Antiderivative was successfully verified.

[In]

Int[2^(2*x)/(a - 2^x*b),x]

[Out]

-(2^x/(b*Log[2])) - (a*Log[a - 2^x*b])/(b^2*Log[2])

Rule 2248

Int[((a_) + (b_.)*(F_)^((e_.)*((c_.) + (d_.)*(x_))))^(p_.)*(G_)^((h_.)*((f_.) + (g_.)*(x_))), x_Symbol] :> Wit
h[{m = FullSimplify[(g*h*Log[G])/(d*e*Log[F])]}, Dist[(Denominator[m]*G^(f*h - (c*g*h)/d))/(d*e*Log[F]), Subst
[Int[x^(Numerator[m] - 1)*(a + b*x^Denominator[m])^p, x], x, F^((e*(c + d*x))/Denominator[m])], x] /; LeQ[m, -
1] || GeQ[m, 1]] /; FreeQ[{F, G, a, b, c, d, e, f, g, h, p}, x]

Rule 43

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rubi steps

\begin{align*} \int \frac{2^{2 x}}{a-2^x b} \, dx &=\frac{\operatorname{Subst}\left (\int \frac{x}{a-b x} \, dx,x,2^x\right )}{\log (2)}\\ &=\frac{\operatorname{Subst}\left (\int \left (-\frac{1}{b}-\frac{a}{b (-a+b x)}\right ) \, dx,x,2^x\right )}{\log (2)}\\ &=-\frac{2^x}{b \log (2)}-\frac{a \log \left (a-2^x b\right )}{b^2 \log (2)}\\ \end{align*}

Mathematica [A]  time = 0.0130584, size = 26, normalized size = 0.81 \[ -\frac{a \log \left (a-b 2^x\right )+b 2^x}{b^2 \log (2)} \]

Antiderivative was successfully verified.

[In]

Integrate[2^(2*x)/(a - 2^x*b),x]

[Out]

-((2^x*b + a*Log[a - 2^x*b])/(b^2*Log[2]))

________________________________________________________________________________________

Maple [A]  time = 0.009, size = 37, normalized size = 1.2 \begin{align*} -{\frac{{{\rm e}^{x\ln \left ( 2 \right ) }}}{\ln \left ( 2 \right ) b}}-{\frac{a\ln \left ( a-{{\rm e}^{x\ln \left ( 2 \right ) }}b \right ) }{\ln \left ( 2 \right ){b}^{2}}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(2^(2*x)/(a-2^x*b),x)

[Out]

-1/ln(2)/b*exp(x*ln(2))-1/ln(2)/b^2*a*ln(a-exp(x*ln(2))*b)

________________________________________________________________________________________

Maxima [A]  time = 0.967473, size = 45, normalized size = 1.41 \begin{align*} -\frac{2^{x}}{b \log \left (2\right )} - \frac{a \log \left (2^{x} b - a\right )}{b^{2} \log \left (2\right )} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(2^(2*x)/(a-2^x*b),x, algorithm="maxima")

[Out]

-2^x/(b*log(2)) - a*log(2^x*b - a)/(b^2*log(2))

________________________________________________________________________________________

Fricas [A]  time = 1.59681, size = 57, normalized size = 1.78 \begin{align*} -\frac{2^{x} b + a \log \left (2^{x} b - a\right )}{b^{2} \log \left (2\right )} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(2^(2*x)/(a-2^x*b),x, algorithm="fricas")

[Out]

-(2^x*b + a*log(2^x*b - a))/(b^2*log(2))

________________________________________________________________________________________

Sympy [A]  time = 0.155308, size = 34, normalized size = 1.06 \begin{align*} - \frac{a \log{\left (2^{x} - \frac{a}{b} \right )}}{b^{2} \log{\left (2 \right )}} + \begin{cases} - \frac{2^{x}}{b \log{\left (2 \right )}} & \text{for}\: b \log{\left (2 \right )} \neq 0 \\- \frac{x}{b} & \text{otherwise} \end{cases} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(2**(2*x)/(a-2**x*b),x)

[Out]

-a*log(2**x - a/b)/(b**2*log(2)) + Piecewise((-2**x/(b*log(2)), Ne(b*log(2), 0)), (-x/b, True))

________________________________________________________________________________________

Giac [A]  time = 1.1736, size = 46, normalized size = 1.44 \begin{align*} -\frac{2^{x}}{b \log \left (2\right )} - \frac{a \log \left ({\left | 2^{x} b - a \right |}\right )}{b^{2} \log \left (2\right )} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(2^(2*x)/(a-2^x*b),x, algorithm="giac")

[Out]

-2^x/(b*log(2)) - a*log(abs(2^x*b - a))/(b^2*log(2))