MathGroup Archive 2007

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

Search the Archive

Re: Plot, Epilog, and Text


> g[X_String,w_Real,f_]:=Text[Style[X,12,Bold],{w,f/.{x->w}},{0,-2}];

Among other things, you'll need to replace _Real with _?NumberQ.  3
does not have a head of Real.
Also, because Plot has Attributes[Plot] = {HoldAll,...}, you'll need
to wrap Epilog->{g...} in Evaluate to make sure g gets replaced by the
correct value.

At this point, if you put //Trace after each version of the Plot
command, you can see that both end up evaluating the same thing. And
both do produce the correct plot.

Hope this helps.

-Richard



  • Prev by Date: Re: Animation of a rotating object. (Mathematica 6)
  • Next by Date: Re: Limits of Nested Expressions
  • Previous by thread: Re: Plot, Epilog, and Text
  • Next by thread: Re: Plot, Epilog, and Text