Skip to main content
Mathematica

Return to Answer

Added plots and fixed formatting
Source Link
Öskå
Öskå
  • 8.6k
  • 4
  • 32
  • 50

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

g = Plot[x^2, {x, 20, 100}]

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

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

Mathematica graphics

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

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

You may use the following commands:

g = Plot[x^2, {x, 20, 100}]

Mathematica graphics

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

Mathematica graphics

Source Link
user14592
user14592
  • 29
  • 1

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

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