3.4.81 \(\int F^{-c (a+b x)^n} (a+b x)^{-1+\frac {n}{2}} \, dx\) [381]

Optimal. Leaf size=47 \[ \frac {\sqrt {\pi } \text {erf}\left (\sqrt {c} (a+b x)^{n/2} \sqrt {\log (F)}\right )}{b \sqrt {c} n \sqrt {\log (F)}} \]

[Out]

erf((b*x+a)^(1/2*n)*c^(1/2)*ln(F)^(1/2))*Pi^(1/2)/b/n/c^(1/2)/ln(F)^(1/2)

________________________________________________________________________________________

Rubi [A]
time = 0.03, antiderivative size = 47, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 26, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.077, Rules used = {2242, 2236} \begin {gather*} \frac {\sqrt {\pi } \text {Erf}\left (\sqrt {c} \sqrt {\log (F)} (a+b x)^{n/2}\right )}{b \sqrt {c} n \sqrt {\log (F)}} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(a + b*x)^(-1 + n/2)/F^(c*(a + b*x)^n),x]

[Out]

(Sqrt[Pi]*Erf[Sqrt[c]*(a + b*x)^(n/2)*Sqrt[Log[F]]])/(b*Sqrt[c]*n*Sqrt[Log[F]])

Rule 2236

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^2), x_Symbol] :> Simp[F^a*Sqrt[Pi]*(Erf[(c + d*x)*Rt[(-b)*Log[F],
2]]/(2*d*Rt[(-b)*Log[F], 2])), x] /; FreeQ[{F, a, b, c, d}, x] && NegQ[b]

Rule 2242

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Dist[1/(d*(m + 1))
, Subst[Int[F^(a + b*x^2), x], x, (c + d*x)^(m + 1)], x] /; FreeQ[{F, a, b, c, d, m, n}, x] && EqQ[n, 2*(m + 1
)]

Rubi steps

\begin {align*} \int F^{-c (a+b x)^n} (a+b x)^{-1+\frac {n}{2}} \, dx &=\frac {2 \text {Subst}\left (\int F^{-c x^2} \, dx,x,(a+b x)^{n/2}\right )}{b n}\\ &=\frac {\sqrt {\pi } \text {erf}\left (\sqrt {c} (a+b x)^{n/2} \sqrt {\log (F)}\right )}{b \sqrt {c} n \sqrt {\log (F)}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]
time = 0.01, size = 47, normalized size = 1.00 \begin {gather*} \frac {\sqrt {\pi } \text {erf}\left (\sqrt {c} (a+b x)^{n/2} \sqrt {\log (F)}\right )}{b \sqrt {c} n \sqrt {\log (F)}} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(a + b*x)^(-1 + n/2)/F^(c*(a + b*x)^n),x]

[Out]

(Sqrt[Pi]*Erf[Sqrt[c]*(a + b*x)^(n/2)*Sqrt[Log[F]]])/(b*Sqrt[c]*n*Sqrt[Log[F]])

________________________________________________________________________________________

Maple [A]
time = 0.08, size = 34, normalized size = 0.72

method	result	size
risch	\(\frac {\sqrt {\pi }\, \erf \left (\sqrt {c \ln \left (F \right )}\, \left (b x +a \right )^{\frac {n}{2}}\right )}{n b \sqrt {c \ln \left (F \right )}}\)	\(34\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((b*x+a)^(-1+1/2*n)/(F^(c*(b*x+a)^n)),x,method=_RETURNVERBOSE)

[Out]

1/n/b*Pi^(1/2)/(c*ln(F))^(1/2)*erf((c*ln(F))^(1/2)*(b*x+a)^(1/2*n))

________________________________________________________________________________________

Maxima [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*x+a)^(-1+1/2*n)/(F^(c*(b*x+a)^n)),x, algorithm="maxima")

[Out]

integrate((b*x + a)^(1/2*n - 1)/F^((b*x + a)^n*c), x)

________________________________________________________________________________________

Fricas [A]
time = 0.38, size = 47, normalized size = 1.00 \begin {gather*} \frac {\sqrt {\pi } \sqrt {c \log \left (F\right )} \operatorname {erf}\left ({\left (b x + a\right )} \sqrt {c \log \left (F\right )} {\left (b x + a\right )}^{\frac {1}{2} \, n - 1}\right )}{b c n \log \left (F\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*x+a)^(-1+1/2*n)/(F^(c*(b*x+a)^n)),x, algorithm="fricas")

[Out]

sqrt(pi)*sqrt(c*log(F))*erf((b*x + a)*sqrt(c*log(F))*(b*x + a)^(1/2*n - 1))/(b*c*n*log(F))

________________________________________________________________________________________

Sympy [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int F^{- c \left (a + b x\right )^{n}} \left (a + b x\right )^{\frac {n}{2} - 1}\, dx \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*x+a)**(-1+1/2*n)/(F**(c*(b*x+a)**n)),x)

[Out]

Integral((a + b*x)**(n/2 - 1)/F**(c*(a + b*x)**n), x)

________________________________________________________________________________________

Giac [A]
time = 2.92, size = 35, normalized size = 0.74 \begin {gather*} -\frac {\sqrt {\pi } \operatorname {erf}\left (-\sqrt {c \log \left (F\right )} \sqrt {{\left (b x + a\right )}^{n}}\right )}{\sqrt {c \log \left (F\right )} b n} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*x+a)^(-1+1/2*n)/(F^(c*(b*x+a)^n)),x, algorithm="giac")

[Out]

-sqrt(pi)*erf(-sqrt(c*log(F))*sqrt((b*x + a)^n))/(sqrt(c*log(F))*b*n)

________________________________________________________________________________________

Mupad [B]
time = 4.04, size = 35, normalized size = 0.74 \begin {gather*} \frac {\sqrt {\pi }\,\mathrm {erf}\left (\sqrt {c}\,\sqrt {\ln \left (F\right )}\,{\left (a+b\,x\right )}^{n/2}\right )}{b\,\sqrt {c}\,n\,\sqrt {\ln \left (F\right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a + b*x)^(n/2 - 1)/F^(c*(a + b*x)^n),x)

[Out]

(pi^(1/2)*erf(c^(1/2)*log(F)^(1/2)*(a + b*x)^(n/2)))/(b*c^(1/2)*n*log(F)^(1/2))

________________________________________________________________________________________