MathGroup Archive 1997

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

Search the Archive

Locating text in Show

  • To: mathgroup at smc.vnet.net
  • Subject: [mg8205] Locating text in Show
  • From: "Steven T. Hatton" <hattons at cpkwebser5.ncr.disa.mil>
  • Date: Mon, 18 Aug 1997 23:24:54 -0400
  • Organization: Logicon supporting DISA
  • Sender: owner-wri-mathgroup at wolfram.com

--------------AD9963CAE69038D8BEBBACD2

I am trying to label points in a graph that I am generating with the
following.  Before I attempt to overlay the two graphics objects I want
to get the text to locate in conjunction with the points on the circle.
In other words I need to locate the text at the vertices of the octagon
with an offset.  I am finding that all but the first three points of
"dots" are located at the bottom of the graph.  Does anybody have some
insight into what is going on here?

<< Geometry`Polytopes`
dots=Vertices[Octagon]
Show[Graphics[{{PointSize[.03], Point /@ dots},{Circle[{0,0},1]}},
        AspectRatio -> 1]]
Show[Graphics[{
      Thread[Text[{A, B, C,
D},{dots[[1]],dots[[2]],dots[[3]],dots[[4]]}   ]]},
    AspectRatio->1,PlotRange->All]]

Steve

--------------AD9963CAE69038D8BEBBACD2
Content-Description: Card for Steven T. Hatton

begin:          vcard
fn:             Steven T. Hatton
n:              ;Steven T. Hatton
email;internet: hattons at cpkwebser5.ncr.disa.mil
note:           this is a test
x-mozilla-cpt:  ;0
x-mozilla-html: FALSE
end:            vcard


--------------AD9963CAE69038D8BEBBACD2--


  • Prev by Date: Re: Sorting Eigenvalues/EigenVectors
  • Next by Date: Need package for Lyapunov exponents
  • Previous by thread: Trying to use Solve - temp1a.nb (1/1)
  • Next by thread: Re: Locating text in Show