Integrand size = 15, antiderivative size = 239 \[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\frac {2 a^2 f^{\frac {c}{(a+b x)^3}} (a+b x)^3}{b^5}-\frac {2 a^2 c \operatorname {ExpIntegralEi}\left (\frac {c \log (f)}{(a+b x)^3}\right ) \log (f)}{b^5}+\frac {a^4 (a+b x) \Gamma \left (-\frac {1}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \sqrt [3]{-\frac {c \log (f)}{(a+b x)^3}}}{3 b^5}-\frac {4 a^3 (a+b x)^2 \Gamma \left (-\frac {2}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{2/3}}{3 b^5}-\frac {4 a (a+b x)^4 \Gamma \left (-\frac {4}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{4/3}}{3 b^5}+\frac {(a+b x)^5 \Gamma \left (-\frac {5}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{5/3}}{3 b^5} \]
2*a^2*f^(c/(b*x+a)^3)*(b*x+a)^3/b^5-2*a^2*c*Ei(c*ln(f)/(b*x+a)^3)*ln(f)/b^ 5+1/3*a^4*(b*x+a)*GAMMA(-1/3,-c*ln(f)/(b*x+a)^3)*(-c*ln(f)/(b*x+a)^3)^(1/3 )/b^5-4/3*a^3*(b*x+a)^2*GAMMA(-2/3,-c*ln(f)/(b*x+a)^3)*(-c*ln(f)/(b*x+a)^3 )^(2/3)/b^5-4/3*a*(b*x+a)^4*GAMMA(-4/3,-c*ln(f)/(b*x+a)^3)*(-c*ln(f)/(b*x+ a)^3)^(4/3)/b^5+1/3*(b*x+a)^5*GAMMA(-5/3,-c*ln(f)/(b*x+a)^3)*(-c*ln(f)/(b* x+a)^3)^(5/3)/b^5
Time = 0.13 (sec) , antiderivative size = 219, normalized size of antiderivative = 0.92 \[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\frac {6 a^2 f^{\frac {c}{(a+b x)^3}} (a+b x)^3-6 a^2 c \operatorname {ExpIntegralEi}\left (\frac {c \log (f)}{(a+b x)^3}\right ) \log (f)+a^4 (a+b x) \Gamma \left (-\frac {1}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \sqrt [3]{-\frac {c \log (f)}{(a+b x)^3}}+4 a c (a+b x) \Gamma \left (-\frac {4}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \log (f) \sqrt [3]{-\frac {c \log (f)}{(a+b x)^3}}-4 a^3 (a+b x)^2 \Gamma \left (-\frac {2}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{2/3}+(a+b x)^5 \Gamma \left (-\frac {5}{3},-\frac {c \log (f)}{(a+b x)^3}\right ) \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{5/3}}{3 b^5} \]
(6*a^2*f^(c/(a + b*x)^3)*(a + b*x)^3 - 6*a^2*c*ExpIntegralEi[(c*Log[f])/(a + b*x)^3]*Log[f] + a^4*(a + b*x)*Gamma[-1/3, -((c*Log[f])/(a + b*x)^3)]*( -((c*Log[f])/(a + b*x)^3))^(1/3) + 4*a*c*(a + b*x)*Gamma[-4/3, -((c*Log[f] )/(a + b*x)^3)]*Log[f]*(-((c*Log[f])/(a + b*x)^3))^(1/3) - 4*a^3*(a + b*x) ^2*Gamma[-2/3, -((c*Log[f])/(a + b*x)^3)]*(-((c*Log[f])/(a + b*x)^3))^(2/3 ) + (a + b*x)^5*Gamma[-5/3, -((c*Log[f])/(a + b*x)^3)]*(-((c*Log[f])/(a + b*x)^3))^(5/3))/(3*b^5)
Time = 0.42 (sec) , antiderivative size = 239, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.133, Rules used = {2656, 2009}
Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.
\(\displaystyle \int x^4 f^{\frac {c}{(a+b x)^3}} \, dx\) |
\(\Big \downarrow \) 2656 |
\(\displaystyle \int \left (\frac {a^4 f^{\frac {c}{(a+b x)^3}}}{b^4}-\frac {4 a^3 (a+b x) f^{\frac {c}{(a+b x)^3}}}{b^4}+\frac {6 a^2 (a+b x)^2 f^{\frac {c}{(a+b x)^3}}}{b^4}+\frac {(a+b x)^4 f^{\frac {c}{(a+b x)^3}}}{b^4}-\frac {4 a (a+b x)^3 f^{\frac {c}{(a+b x)^3}}}{b^4}\right )dx\) |
\(\Big \downarrow \) 2009 |
\(\displaystyle \frac {a^4 (a+b x) \sqrt [3]{-\frac {c \log (f)}{(a+b x)^3}} \Gamma \left (-\frac {1}{3},-\frac {c \log (f)}{(a+b x)^3}\right )}{3 b^5}-\frac {4 a^3 (a+b x)^2 \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{2/3} \Gamma \left (-\frac {2}{3},-\frac {c \log (f)}{(a+b x)^3}\right )}{3 b^5}-\frac {2 a^2 c \log (f) \operatorname {ExpIntegralEi}\left (\frac {c \log (f)}{(a+b x)^3}\right )}{b^5}+\frac {2 a^2 (a+b x)^3 f^{\frac {c}{(a+b x)^3}}}{b^5}+\frac {(a+b x)^5 \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{5/3} \Gamma \left (-\frac {5}{3},-\frac {c \log (f)}{(a+b x)^3}\right )}{3 b^5}-\frac {4 a (a+b x)^4 \left (-\frac {c \log (f)}{(a+b x)^3}\right )^{4/3} \Gamma \left (-\frac {4}{3},-\frac {c \log (f)}{(a+b x)^3}\right )}{3 b^5}\) |
(2*a^2*f^(c/(a + b*x)^3)*(a + b*x)^3)/b^5 - (2*a^2*c*ExpIntegralEi[(c*Log[ f])/(a + b*x)^3]*Log[f])/b^5 + (a^4*(a + b*x)*Gamma[-1/3, -((c*Log[f])/(a + b*x)^3)]*(-((c*Log[f])/(a + b*x)^3))^(1/3))/(3*b^5) - (4*a^3*(a + b*x)^2 *Gamma[-2/3, -((c*Log[f])/(a + b*x)^3)]*(-((c*Log[f])/(a + b*x)^3))^(2/3)) /(3*b^5) - (4*a*(a + b*x)^4*Gamma[-4/3, -((c*Log[f])/(a + b*x)^3)]*(-((c*L og[f])/(a + b*x)^3))^(4/3))/(3*b^5) + ((a + b*x)^5*Gamma[-5/3, -((c*Log[f] )/(a + b*x)^3)]*(-((c*Log[f])/(a + b*x)^3))^(5/3))/(3*b^5)
3.3.32.3.1 Defintions of rubi rules used
Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*(Px_), x_Symbol] :> Int[ ExpandLinearProduct[F^(a + b*(c + d*x)^n), Px, c, d, x], x] /; FreeQ[{F, a, b, c, d, n}, x] && PolynomialQ[Px, x]
\[\int f^{\frac {c}{\left (b x +a \right )^{3}}} x^{4}d x\]
Time = 0.09 (sec) , antiderivative size = 248, normalized size of antiderivative = 1.04 \[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=-\frac {20 \, a^{2} c {\rm Ei}\left (\frac {c \log \left (f\right )}{b^{3} x^{3} + 3 \, a b^{2} x^{2} + 3 \, a^{2} b x + a^{3}}\right ) \log \left (f\right ) - {\left (20 \, a^{3} b^{2} - 3 \, b^{2} c \log \left (f\right )\right )} \left (-\frac {c \log \left (f\right )}{b^{3}}\right )^{\frac {2}{3}} \Gamma \left (\frac {1}{3}, -\frac {c \log \left (f\right )}{b^{3} x^{3} + 3 \, a b^{2} x^{2} + 3 \, a^{2} b x + a^{3}}\right ) + 10 \, {\left (a^{4} b - 3 \, a b c \log \left (f\right )\right )} \left (-\frac {c \log \left (f\right )}{b^{3}}\right )^{\frac {1}{3}} \Gamma \left (\frac {2}{3}, -\frac {c \log \left (f\right )}{b^{3} x^{3} + 3 \, a b^{2} x^{2} + 3 \, a^{2} b x + a^{3}}\right ) - {\left (2 \, b^{5} x^{5} + 2 \, a^{5} + 3 \, {\left (b^{2} c x^{2} - 8 \, a b c x - 9 \, a^{2} c\right )} \log \left (f\right )\right )} f^{\frac {c}{b^{3} x^{3} + 3 \, a b^{2} x^{2} + 3 \, a^{2} b x + a^{3}}}}{10 \, b^{5}} \]
-1/10*(20*a^2*c*Ei(c*log(f)/(b^3*x^3 + 3*a*b^2*x^2 + 3*a^2*b*x + a^3))*log (f) - (20*a^3*b^2 - 3*b^2*c*log(f))*(-c*log(f)/b^3)^(2/3)*gamma(1/3, -c*lo g(f)/(b^3*x^3 + 3*a*b^2*x^2 + 3*a^2*b*x + a^3)) + 10*(a^4*b - 3*a*b*c*log( f))*(-c*log(f)/b^3)^(1/3)*gamma(2/3, -c*log(f)/(b^3*x^3 + 3*a*b^2*x^2 + 3* a^2*b*x + a^3)) - (2*b^5*x^5 + 2*a^5 + 3*(b^2*c*x^2 - 8*a*b*c*x - 9*a^2*c) *log(f))*f^(c/(b^3*x^3 + 3*a*b^2*x^2 + 3*a^2*b*x + a^3)))/b^5
\[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\int f^{\frac {c}{\left (a + b x\right )^{3}}} x^{4}\, dx \]
\[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\int { f^{\frac {c}{{\left (b x + a\right )}^{3}}} x^{4} \,d x } \]
1/10*(2*b^4*x^5 + 3*b*c*x^2*log(f) - 24*a*c*x*log(f))*f^(c/(b^3*x^3 + 3*a* b^2*x^2 + 3*a^2*b*x + a^3))/b^4 + integrate(3/10*(20*a^2*b^3*c*x^3*log(f) + 8*a^5*c*log(f) + (40*a^3*b^2*c*log(f) + 3*b^2*c^2*log(f)^2)*x^2 + 6*(5*a ^4*b*c*log(f) - 4*a*b*c^2*log(f)^2)*x)*f^(c/(b^3*x^3 + 3*a*b^2*x^2 + 3*a^2 *b*x + a^3))/(b^8*x^4 + 4*a*b^7*x^3 + 6*a^2*b^6*x^2 + 4*a^3*b^5*x + a^4*b^ 4), x)
\[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\int { f^{\frac {c}{{\left (b x + a\right )}^{3}}} x^{4} \,d x } \]
Timed out. \[ \int f^{\frac {c}{(a+b x)^3}} x^4 \, dx=\int f^{\frac {c}{{\left (a+b\,x\right )}^3}}\,x^4 \,d x \]