Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

RE: PlotRange-> {0, All}

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50906] RE: [mg50894] PlotRange-> {0, All}
  • From: "David Park" <djmp at earthlink.net>
  • Date: Mon, 27 Sep 2004 00:42:14 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Sean,

You can use {0, Automatic} if you can live with that. Or you could calculate
the plot twice. For example...

prange =
  MapAt[Max[0, #] &,
    PlotRange /.
      AbsoluteOptions[
        Plot[Sin[x], {x, 0, 4Pi}, DisplayFunction -> Identity,
          PlotRange -> All], PlotRange], {{2, 1}}]

Plot[Sin[x], {x, 0, 4Pi},
    PlotRange -> prange];

Or with DrawGraphics I might do it something like...

Needs["DrawGraphics`DrawingMaster`"]

Module[{g, prange},
  g = Draw[Sin[x], {x, 0, 4Pi}];
  prange =
    MapAt[Max[0, #] &,
      PlotRange /.
        AbsoluteOptions[DontShow[Graphics[g], PlotRange -> All],
          PlotRange], {{2, 1}}];
  Draw2D[
    {g},
    PlotRange -> prange,
    Axes -> True]

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/





From: sean kim [mailto:sean_incali at yahoo.com]
To: mathgroup at smc.vnet.net

Is that possible?

For now it seems to only allow All or Automatic or Range{}

But is there anyway to change the PlotRange code so that it will
always display from 0 to Max value? ( like All but starting from the
0, Instead of Min value)

Thanks in adavnce for any thoughts

sean




  • Prev by Date: problem with very slow matrix function
  • Next by Date: Re: unevaluated, hold, holdform
  • Previous by thread: PlotRange-> {0, All}
  • Next by thread: A list element replacement.