Skip to main content
1 of 2

You may use the following commands In[108]:= g = Plot[x^2, {x, 20, 100}]

Show[g /. x_Line :> Reverse[x, 3], PlotRange -> Automatic]