Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Coordinates of vertices

  • To: mathgroup at smc.vnet.net
  • Subject: [mg87753] Re: [mg87720] Coordinates of vertices
  • From: "Maarten van der Burgt" <maarten.vanderburgt at icos.be>
  • Date: Wed, 16 Apr 2008 06:51:30 -0400 (EDT)

Peter,

The vertices are in the graphics object.
Just use [[ ]] to get them out.

tc=Truncate[PolyhedronData["Cube"]]
vertices=ph[[1,1]]//N
ListPointPlot3D[vertices ,BoxRatios->Automatic]

Hope this helps,

maarten



                                                                                                                                                   
                    "King, Peter R"                                                                                                                
                    <peter.king@imper        To:     mathgroup at smc.vnet.net                                                                        
                    ial.ac.uk>               cc:                                                                                                   
                                             Subject:     [mg87720] Coordinates of vertices                                                        
                    16/04/2008 11:02                                                                                                               
                                                                                                                                                   
                                                                                                                                                   




I am sure I have done this before but I can't for the life of me
remember how, and I can't find it in the manual. Some help would be much
appreciated. I'd like to find the coordinates of the vertices of a
truncated cube.

Whilst Vertices[cube] correctly gives me the coordinates of a cube
Vertices[Truncate[Polyhedron[Cube]]] doesn't do what I want because
Truncate[Polyhedron[... is a graphics object not a polyhedron object. So
can I convert the graphics object into a polyhedron and use vertices, or
work out the vertices some other way (for a cube this is trivial to do
but for more complicated shapes this is much more tedious)

Thanks,

Peter








  • Prev by Date: Re: DifferenitalD vs CapitalDifferenitalD
  • Next by Date: Re: Re: Mathematica Player Pro!
  • Previous by thread: Re: If Integrate returns no result, can we conclude that no closed-form
  • Next by thread: RE: Coordinates of vertices