MathGroup Archive 2001

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

Search the Archive

Re: Adding text at various X,Y locations on Multi-Function Graphs


In a message dated 2001/8/8 1:35:28 AM, wcooper1 at san.rr.com writes:

>Does anyone know the syntax to enter text at various x,y coordinates into
>a
>multi-function graph, e.g.
>
>ShowLegend[Plot[{Sin[x], Sin[2*x]}, {x, -2 Pi, 2 Pi}]]
>

Needs["Graphics`Legend`"];

Plot[{Sin[x], Sin[2*x]}, {x, -2 Pi, 2 Pi}, 
    Epilog -> {
        Text["<-Sin[2x]", {4.25, Sin[8.5]}, 
          {-1, 0}], 
        Text["Sin[2x]->", {-4.25, Sin[-8.5]}, 
          {1, 0}]}, 
    PlotRange -> All,
    PlotStyle -> {RGBColor[0, 0, 1], 
        RGBColor[1, 0, 0]}, 
    PlotLegend -> {"Sin[x]", "Sin[2x]"}, 
    LegendPosition -> {1., -.35}, 
    ImageSize -> 400];


Bob Hanlon
Chantilly, VA  USA


  • Prev by Date: using findroot for multiple functions
  • Next by Date: Re: Notebook Filename
  • Previous by thread: Re: Adding text at various X,Y locations on Multi-Function Graphs
  • Next by thread: Inserting Text into Multifunction Graphs