plot[(x^2)-x and y=x^3-4x^2+3x, x=-1 to 5]