MathGroup Archive 2001

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

Search the Archive

Re: Arrows on axes?


Needs["Graphics`Arrow`"];

Show[{Plot[Sin[x], {x, 0, 2Pi}, DisplayFunction -> Identity], 
      Graphics[{Arrow[{2Pi, 0}, {2.15Pi, 0}], Arrow[{0, 1.2}, {0, 1.3}]}]}, 
    DisplayFunction -> $DisplayFunction];

DisplayTogether[Plot[Sin[x], {x, 0, 2Pi}], 
    Graphics[{Arrow[{2Pi, 0}, {2.15Pi, 0}], Arrow[{0, 1.2}, {0, 1.3}]}]];

Plot[Sin[x], {x, 0, 2Pi}, 
    Epilog -> {Arrow[{2Pi, 0}, {2.15Pi, 0}], Arrow[{0., 1.2}, {0., 1.3}]}, 
    PlotRange -> {{-0.15, 2.15Pi}, {-1.07, 1.3}}];


Bob Hanlon

In a message dated 2001/2/17 3:49:34 AM, lysov at paloma.spbu.ru writes:

>How to draw arrows at ends of axes?
>


  • Prev by Date: Re: Arrows on axes?
  • Next by Date: Re: String to Number
  • Previous by thread: Re: Arrows on axes?
  • Next by thread: Re: Arrows on axes?