__f__ := __x__ -> (2*__x__^2 + 3*__x__ - 2) / (__x__^3 - 2*__x__^2 - 15*__x__);

plot(__f__(__x__), __x__=-10..10, __y__=-5..5, discont = false);

__Asy__ := Student[Calculus1][Asymptotes](__f__(__x__));

__cPts__ := Student[Calculus1][CriticalPoints](__f__(__x__));

__ePts__ := Student[Calculus1][ExtremePoints](__f__(__x__));

__iPts__ := evalf(Student[Calculus1][InflectionPoints](__f__(__x__)));

__R__ := Student[Calculus1][Roots](__f__(__x__));