Groups > comp.soft-sys.math.mathematica > #16424

Re: Vertices of a polyhedron

From	Bob Hanlon <hanlonr357@gmail.com>
Newsgroups	comp.soft-sys.math.mathematica
Subject	Re: Vertices of a polyhedron
Date	2014-01-16 06:49 +0000
Message-ID	<lb7vec$3su$1@smc.vnet.net> (permalink)
References	<20140115091636.D43B869EB@smc.vnet.net>
Organization	Time-Warner Telecom

Show all headers | View raw

PolyhedronData[12 + 8 + 6]


{"ElongatedSquareGyrobicupola", "GreatRhombicuboctahedron", \
"GyroelongatedSquareCupola", "GyroelongatedTriangularBicupola", \
"SmallRhombicuboctahedron", "SnubSquareAntiprism"}


poly = "GreatRhombicuboctahedron";


graph = PolyhedronData[poly, "NetGraph"]


polyImage = PolyhedronData[poly]


vCnt = PolyhedronData[poly, "VertexCount"]


48


vCoord = PolyhedronData[poly, "VertexCoordinates"]


Length[vCoord] == vCnt


True



Bob Hanlon




On Wed, Jan 15, 2014 at 4:16 AM, Francisco Javier Garc=EDa Capit=E1n <
garciacapitan@gmail.com> wrote:

>
> Dear friends, how can we calculate the vertices of a convex polyhedron that
> has for its faces 12 squares, 8 regular hexagons, and 6 regular octagons?
>
> --
> ---
> Francisco Javier Garc=EDa Capit=E1n
> http://garciacapitan.99on.com
>
>
>

Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar | Unroll thread

Thread

Re: Vertices of a polyhedron Bob Hanlon <hanlonr357@gmail.com> - 2014-01-16 06:49 +0000

csiph-web