MathGroup Archive 2000

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

Search the Archive

Re: Problem with the Grapical Arrows

  • To: mathgroup at smc.vnet.net
  • Subject: [mg22628] Re: Problem with the Grapical Arrows
  • From: Brian Higgins <bghiggins at ucdavis.edu>
  • Date: Thu, 16 Mar 2000 09:10:45 -0500 (EST)
  • References: <8an2f0$1v5@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Steve,
It seems like you are doing everything correctly. For example I can get
the arrow to appear in the following (using Mathematica 4.0):
Needs["Graphics`Arrow`"]
Needs["Graphics`FilledPlot`"]
myplot2=FilledPlot[Sin[x], {x, 0, 2 Pi}]
Show[myplot2,
Epilog -> {Arrow[{4, .25}, {Pi/2, 1}], Text["Here", {4, .15}, {0,
-1}]}]
My only suggestion is to check that the plot ranges are OK.
Brian
In article <8an2f0$1v5 at smc.vnet.net>,
com3 at ix.netcom*NOSPAM*.com wrote:
> Can someone help with this, I'm using ver 3.0 ?
>
> I've produced 4 separate plots and have combined them into a single
> plot using the Show command.
>
> I then need to annotate this plot and do so with the Text and Epilog
> commands. . . so far so good.
>
> I would now like to add an arrow to this plot but can't get it to
> work. See my code below.
>
> Needs["Graphics`Arrow`"]
> Needs["Graphics`FilledPlot`"]
> Show[plot1,plot3,plot2,plot4,
> PlotRange->{{20000,52000},{0,.00014}},
> FrameTicks->{None,None,None,None},
> FrameLabel->{"xlabel",
> "ylabel" },
> Epilog->{Text["A",Scaled[{.315,.97}]],
> Text["B",Scaled[{.62,.73}]],
> Text["C",Scaled[{.46,.36}]],
> Text["D",Scaled[{.55,.9}]],
> Text["E",Scaled[{.8,.8}]],
> Text["F",Scaled[{.65,.26}]],
> Arrow[{.9,.9},{.1,.1}] }]
>
> A couple of the plots are "filled" that's why
> Needs["Graphics`FilledPlot`"] is shown.
>
> The plots 1 thru 4 and all text get rendered properly but the arrow
> simply doesn't appear. I also receive no error message whatsoever.
> It's as if an invisible arrow is being rendered.
>
> Also, the following code works fine on my machine, but doesn't use the
> Show command.
> Plot[Sin[x], {x, 0, 2Pi},
> Epilog -> {Arrow[{4, .25}, {Pi/2, 1}],
> Text["Here", {4, .15}, {0, -1}]}]
>
> What am I doing wrong ?
>
> Much appreciation for any help.
>
> Steve
> For any e-mail responses, please remove *NOSPAM* from my address.
>


Sent via Deja.com http://www.deja.com/
Before you buy.


  • Prev by Date: Re: Problem with the Grapical Arrows
  • Next by Date: Re: [Q] Differential equation?
  • Previous by thread: Re: Problem with the Grapical Arrows
  • Next by thread: running a program in batch