MathGroup Archive 2009

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

Search the Archive

Re: problems with using graphics objects in arrowheads

  • To: mathgroup at smc.vnet.net
  • Subject: [mg101757] Re: problems with using graphics objects in arrowheads
  • From: "Charles E. Oelsner" <c.oelsner at att.net>
  • Date: Thu, 16 Jul 2009 08:18:59 -0400 (EDT)

I use Inset to annotate arrows with text (as a kind of graphic).  Here is an example from my calculus notes about slicing a solid of revolution.  

Charles


Clear[r, R];
r = 2;
R = 4;
imsize = 20;

Show[{
  RegionPlot[r^2 <= x^2 + y^2 <= R^2, {x, -R, R}, {y, -R, R}, 
   Frame -> False, PlotStyle -> LightGray, BoundaryStyle -> Black],
  
  Graphics[{
    Arrowheads[
     {
      {.01, .5, 
       Graphics[Inset[Style["R = f(x)", imsize], {Center, Top}]]},
      {.05, 1}
      }
     ],
    Arrow[{{0, 0}, {R/2, (R Sqrt[3])/2}}],
    Arrowheads[
     {
      {.01, .5, 
       Graphics[Inset[Style["r = g(x)", imsize], {Center, Top}]]},
      {.05, 1}
      }
     ],
    Arrow[{{0, 0}, {r/2 Sqrt[3], -(r/2)}}]}
   ]}]


  • Prev by Date: CityData can't be used in Init.m?
  • Next by Date: Standard deviations and Confidence intervals with respect to errors
  • Previous by thread: Re: problems with using graphics objects in arrowheads
  • Next by thread: equation expression problem