Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: Adding text to RegionPlot

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98578] Re: Adding text to RegionPlot
  • From: Helen Read <hpr at together.net>
  • Date: Mon, 13 Apr 2009 03:34:16 -0400 (EDT)
  • References: <grs67t$qfq$1@smc.vnet.net>
  • Reply-to: HPR <read at math.uvm.edu>

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?

RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1},
  PlotRange -> {{0, 3}, {0, 1}}, Epilog -> Text["my text", {1.3, 1}]]

This will cut off your text, though, since it is centered at {1.3,1}. 
You need to leave a bit of vertical room for it, something like this.

RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1},
  PlotRange -> {{0, 3}, {0, 1.2}}, Epilog -> Text["my text", {1.3, 1}]]


You can also combine graphics with Show, instead of packing a lot into 
Epilog.

plot1 = RegionPlot[y <= (1/x^2) && y >= 0, {x, 1, 3}, {y, 0, 1}];
plot2 = Graphics[{Red, FontSize -> 14, FontFamily -> "Helvetica",
     Text["My text", {1.3, 1}]}];
Show[{plot1, plot2}, PlotRange -> {{0, 3}, {0, 1.2}}]



Note also that you don't need RegionPlot for your example.


plot1 = Plot[1/x^2, {x, 1, 3}, Filling -> 0];
plot2 = Graphics[{Red, FontSize -> 14, FontFamily -> "Helvetica",
     Text["My text", {1.3, 1}]}];
Show[{plot1, plot2}, PlotRange -> {{0, 3}, {0, 1.2}},
  AxesOrigin -> {0, 0}]


-- 
Helen Read
University of Vermont


  • Prev by Date: Re: Change in NSolve algorithm
  • Next by Date: Re: Importing a large image...
  • Previous by thread: Re: Adding text to RegionPlot
  • Next by thread: Re: Adding text to RegionPlot