Rational functions
>
f := (x^7-24*x^4-4*x^2+8*x-8)/(x^8+6*x^6+12*x^4+8*x^2);
>
pmint(f,x);