How to force ListPlot show origin (0,0)?

plot = ListPlot[Table[-{3, 3.5}, {x, 1, 10}] // Transpose, 
   Joined -> True, PlotRange -> All, AxesOrigin -> {0.01, 0.01}];

this should be general enough for PlotRange->All:

Graphics[
   {#, Opacity[0], Point[{0, 0}]}, 
   PlotRange -> All, ##2
] & @@ plot

enter image description here


Looks like using the workaround described here works in my case:

Show[#,PlotRange->All]&@
ListPlot[Table[{3, 3.5}, {x, 1, 10}]//Transpose, Joined->True,
     PlotRange->All, AxesOrigin->{0, 0}]

This change in behavior can be remedied to fit your needs by using a different PlotRange specification:

PlotRange -> {0, All}

Tags:

Plotting