plot[{3/x^2-1/x-3/x^3,-0.14},{x,0,20},{y,-0.25,0.1}]