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: How do i make the plots show all of the axes?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg50601] Re: [mg50578] How do i make the plots show all of the axes?
  • From: "David Park" <djmp at earthlink.net>
  • Date: Sun, 12 Sep 2004 04:42:12 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Konrad,

Here are some variations:

Plot[x, {x, 1, 3},
    AxesOrigin -> {0, 0},
    AxesLabel -> {x, y},
    PlotLabel -> "Sample Plot"];

Plot[x, {x, 1, 3},
    PlotRange -> {{0, 3}, {0, 3}},
    AxesLabel -> {x, y},
    PlotLabel -> "Sample Plot"];

Plot[x, {x, 1, 3},
    Frame -> True,
    PlotRange -> {{-0.01, 4}, {-0.01, 4}},
    FrameLabel -> {x, y},
    PlotLabel -> "Sample Plot"];

Plot[x, {x, 1, 3},
    Frame -> {True, True, False, False},
    PlotRange -> {{-0.01, 4}, {-0.01, 4}},
    FrameLabel -> {x, y},
    PlotLabel -> "Sample Plot"];

You could define an automatic plot expression that incorporates your choices
as follows:

Needs["Graphics`Colors`"]

EndePlotType1[f_] :=
    Plot[f, {x, 1, 3},
      PlotStyle -> Blue,
      PlotRange -> {{0, 3}, {0, 3}},
      AxesLabel -> {x, y},
      PlotLabel -> "Sample Plot"];

EndePlotType1[x];

However this is only occasionally useful. Often every plot needs detailed
adjustment to look its best. It is difficult to make one template that will
fit everything you will want to plot. A graphic is a work of art. It's
actually fun working them over and touching them up using the various
Mathematica capabilities - once you get to know them.

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


From: Konrad Den Ende [mailto:konrad at viltersten.com]
To: mathgroup at smc.vnet.net

Many times, as i try to plot functions, i need to explicitly
tell Mathematica to put the AxisOrigin to origo, where
they belong. That is easily done BUT:
1) Sometimes the axes won't meat. They seem to be a little
to short. How do i stop it?
2) Is there a way of setting a standard parameters so that
e.g. AxisOrigin always is at {0,0}, or the color of plots is
{red, blue, yellow}. without me having to request it every
single times?

V=E4nligen
Konrad
---------------------------------------------------
phone: (+46/0) 735 - 26 31 41
url: http://konrads.webbsida.com
e-mail: chamster at home.se
ICQ: 132 250 451
-----------------------------------

Sleep - thing used by ineffective people
            as a substitute for coffee

Ambition - a poor excuse for not having
                 enough sence to be lazy
---------------------------------------------------




  • Prev by Date: Re: How do i make the plots show all of the axes?
  • Next by Date: Re: Re: Log[4]==2*Log[2]
  • Previous by thread: Re: How do i make the plots show all of the axes?
  • Next by thread: Trying to eliminate a loop