plot[{3.5/x^2-1/x-3.5/x^3,-0.04},{x,0,25},{y,-0.15,0}]