I am plotting three functions by the following codes:

    Show[Plot[{2^x + 1}, {x, 3/2, 3}, PlotStyle -> Red], Plot[{x + 3}, {x, 1, 3}, PlotStyle -> Blue], Plot[{2 x^2 + 1}, {x, 1, 2}, PlotStyle -> Black], PlotRange -> All, AxesOrigin -> {1, 0}]

I find that the origin point `(1,0)` does not appear in the output. How to make Mathematica show the origin `(1,0)`?