Re: Adding text to RegionPlot

*To*: mathgroup at smc.vnet.net*Subject*: [mg98581] Re: Adding text to RegionPlot*From*: Bill Rowe <readnews at sbcglobal.net>*Date*: Mon, 13 Apr 2009 03:34:49 -0400 (EDT)

On 4/12/09 at 3:46 AM, jim.rockford1 at gmail.com (Jim Rockford) wrote: >I would like to add text at specific (x,y) locations for a 2D >graphic generated by RegionPlot (meaning, I'd rather not use the >graphic tool and add text by hand). Is there a way to do this? I >get mathematica complaints that RegionPlot is not a "type of >graphics." >For example, this code fails: >RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1}, PlotRange >-> {{0, 3}, {0, 1}},Graphics[Text["mytext", {1.5, 1}]] >Apparently I'm using Graphics[Text[]] incorrectly. How can I get >such a simple function of putting text at a specific location to >work in RegionPlot? This does what you want RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1}, PlotRange -> {{0, 3}, {0, 1}}, Epilog -> {Text["mytext", {1.5, 1}]}] However, you have chosen the coordinates for the text to be on the edge of the plot which causes the text to be partially obscured. A better choice might be RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1}, PlotRange -> {{0, 3}, {0, 1}}, Epilog -> {Text["mytext", Scaled at {.5, .95}]}]