\(\int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx\) [379]

Optimal result

Integrand size = 25, antiderivative size = 31 \[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\frac {b^5 F^a \Gamma \left (-5,-b (c+d x)^n \log (F)\right ) \log ^5(F)}{d n} \]

[Out]

-F^a/((d*x+c)^n)^5*Ei(6,-b*(d*x+c)^n*ln(F))/d/n

Rubi [A] (verified)

Time = 0.02 (sec) , antiderivative size = 31, 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.040, Rules used = {2250} \[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\frac {b^5 F^a \log ^5(F) \Gamma \left (-5,-b (c+d x)^n \log (F)\right )}{d n} \]

[In]

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

[Out]

(b^5*F^a*Gamma[-5, -(b*(c + d*x)^n*Log[F])]*Log[F]^5)/(d*n)

Rule 2250

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((e_.) + (f_.)*(x_))^(m_.), x_Symbol] :> Simp[(-F^a)*((e +
f*x)^(m + 1)/(f*n*((-b)*(c + d*x)^n*Log[F])^((m + 1)/n)))*Gamma[(m + 1)/n, (-b)*(c + d*x)^n*Log[F]], x] /; Fre
eQ[{F, a, b, c, d, e, f, m, n}, x] && EqQ[d*e - c*f, 0]

Rubi steps \begin{align*} \text {integral}& = \frac {b^5 F^a \Gamma \left (-5,-b (c+d x)^n \log (F)\right ) \log ^5(F)}{d n} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.01 (sec) , antiderivative size = 31, normalized size of antiderivative = 1.00 \[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\frac {b^5 F^a \Gamma \left (-5,-b (c+d x)^n \log (F)\right ) \log ^5(F)}{d n} \]

[In]

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

[Out]

(b^5*F^a*Gamma[-5, -(b*(c + d*x)^n*Log[F])]*Log[F]^5)/(d*n)

Maple [B] (verified)

Leaf count of result is larger than twice the leaf count of optimal. \(173\) vs. \(2(34)=68\).

Time = 0.64 (sec) , antiderivative size = 174, normalized size of antiderivative = 5.61

method	result	size
risch	\(-\frac {F^{a} \left (\operatorname {Ei}_{1}\left (-b \left (d x +c \right )^{n} \ln \left (F \right )\right ) \ln \left (F \right )^{5} b^{5} \left (d x +c \right )^{5 n}+F^{b \left (d x +c \right )^{n}} \ln \left (F \right )^{4} b^{4} \left (d x +c \right )^{4 n}+F^{b \left (d x +c \right )^{n}} \ln \left (F \right )^{3} b^{3} \left (d x +c \right )^{3 n}+2 F^{b \left (d x +c \right )^{n}} \ln \left (F \right )^{2} b^{2} \left (d x +c \right )^{2 n}+6 F^{b \left (d x +c \right )^{n}} \ln \left (F \right ) b \left (d x +c \right )^{n}+24 F^{b \left (d x +c \right )^{n}}\right ) \left (d x +c \right )^{-5 n}}{120 n d}\)	\(174\)

[In]

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

[Out]

-1/120/n/d*F^a*(Ei(1,-b*(d*x+c)^n*ln(F))*ln(F)^5*b^5*((d*x+c)^n)^5+F^(b*(d*x+c)^n)*ln(F)^4*b^4*((d*x+c)^n)^4+F
^(b*(d*x+c)^n)*ln(F)^3*b^3*((d*x+c)^n)^3+2*F^(b*(d*x+c)^n)*ln(F)^2*b^2*((d*x+c)^n)^2+6*F^(b*(d*x+c)^n)*ln(F)*b
*(d*x+c)^n+24*F^(b*(d*x+c)^n))/((d*x+c)^n)^5

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 137 vs. \(2 (36) = 72\).

Time = 0.31 (sec) , antiderivative size = 137, normalized size of antiderivative = 4.42 \[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\frac {{\left (d x + c\right )}^{5 \, n} F^{a} b^{5} {\rm Ei}\left ({\left (d x + c\right )}^{n} b \log \left (F\right )\right ) \log \left (F\right )^{5} - {\left ({\left (d x + c\right )}^{4 \, n} b^{4} \log \left (F\right )^{4} + {\left (d x + c\right )}^{3 \, n} b^{3} \log \left (F\right )^{3} + 2 \, {\left (d x + c\right )}^{2 \, n} b^{2} \log \left (F\right )^{2} + 6 \, {\left (d x + c\right )}^{n} b \log \left (F\right ) + 24\right )} e^{\left ({\left (d x + c\right )}^{n} b \log \left (F\right ) + a \log \left (F\right )\right )}}{120 \, {\left (d x + c\right )}^{5 \, n} d n} \]

[In]

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

[Out]

1/120*((d*x + c)^(5*n)*F^a*b^5*Ei((d*x + c)^n*b*log(F))*log(F)^5 - ((d*x + c)^(4*n)*b^4*log(F)^4 + (d*x + c)^(
3*n)*b^3*log(F)^3 + 2*(d*x + c)^(2*n)*b^2*log(F)^2 + 6*(d*x + c)^n*b*log(F) + 24)*e^((d*x + c)^n*b*log(F) + a*
log(F)))/((d*x + c)^(5*n)*d*n)

Sympy [F]

\[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\int F^{a + b \left (c + d x\right )^{n}} \left (c + d x\right )^{- 5 n - 1}\, dx \]

[In]

integrate(F**(a+b*(d*x+c)**n)*(d*x+c)**(-1-5*n),x)

[Out]

Integral(F**(a + b*(c + d*x)**n)*(c + d*x)**(-5*n - 1), x)

Maxima [F]

\[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\int { {\left (d x + c\right )}^{-5 \, n - 1} F^{{\left (d x + c\right )}^{n} b + a} \,d x } \]

[In]

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

[Out]

integrate((d*x + c)^(-5*n - 1)*F^((d*x + c)^n*b + a), x)

Giac [F]

\[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\int { {\left (d x + c\right )}^{-5 \, n - 1} F^{{\left (d x + c\right )}^{n} b + a} \,d x } \]

[In]

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

[Out]

integrate((d*x + c)^(-5*n - 1)*F^((d*x + c)^n*b + a), x)

Mupad [F(-1)]

Timed out. \[ \int F^{a+b (c+d x)^n} (c+d x)^{-1-5 n} \, dx=\int \frac {F^{a+b\,{\left (c+d\,x\right )}^n}}{{\left (c+d\,x\right )}^{5\,n+1}} \,d x \]

[In]

int(F^(a + b*(c + d*x)^n)/(c + d*x)^(5*n + 1),x)

[Out]

int(F^(a + b*(c + d*x)^n)/(c + d*x)^(5*n + 1), x)