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

MathGroup Archive 2012

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

Search the Archive

Re: need to find polyhedrons with less than a 24 vertex array in PolyhedronData[]

  • To: mathgroup at smc.vnet.net
  • Subject: [mg124827] Re: need to find polyhedrons with less than a 24 vertex array in PolyhedronData[]
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Wed, 8 Feb 2012 05:33:16 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Select[PolyhedronData[],
 Length[PolyhedronData[#, "VertexCoordinates"]] == 24 &]

{CubeThreeCompound,ElongatedSquareGyrobicupola,GyroelongatedSquareBicupola, IcosahedronTwoCompound,{OctahedronFourCompound,1},SmallRhombicuboctahedron, SnubCube,TetrahedronSixCompound,TruncatedCube,TruncatedOctahedron}

PolyhedronData /@ %


Bob Hanlon

On Tue, Feb 7, 2012 at 4:01 AM, Roger Bagula <roger.bagula at gmail.com> wrote:
> I have an program that that cuts out after 24.
> I need to sort through the data:
> PolyhedronData[]
> {"AcuteGoldenRhombohedron", {"Antiprism", 4}, {"Antiprism",
>  5}, {"Antiprism", 6}, {"Antiprism", 7}, {"Antiprism",
>  8}, {"Antiprism", 9}, {"Antiprism",
>  10}, "AugmentedDodecahedron", "AugmentedHexagonalPrism", \
> "AugmentedPentagonalPrism", "AugmentedSphenocorona", \
> "AugmentedTriangularPrism", "AugmentedTridiminishedIcosahedron", \
> "AugmentedTruncatedCube", "AugmentedTruncatedDodecahedron", \
> "AugmentedTruncatedTetrahedron", "BiaugmentedPentagonalPrism", \
> "BiaugmentedTriangularPrism", "BiaugmentedTruncatedCube", \
> "BigyrateDiminishedRhombicosidodecahedron", "Bilunabirotunda", \
> "CsaszarPolyhedron", "Cube", "CubeFiveCompound", {"CubeFourCompound",
>  1}, {"CubeFourCompound",
>  2}, "CubeOctahedronCompound", "CubeOctahedronFiveCompound", \
> "CubeOctahedronThreeCompound", "CubeSixCompound", "CubeTenCompound", \
> "CubeThreeCompound", "CubeTwoCompound", "Cuboctahedron", \
> "CumulatedCube", "CumulatedDodecahedron", "CumulatedTetrahedron", \
> "DeltoidalHexecontahedron", "DeltoidalIcositetrahedron", \
> "DiminishedRhombicosidodecahedron", {"Dipyramid", 3}, {"Dipyramid",
>  5}, "DisdyakisDodecahedron", "DisdyakisTriacontahedron", \
> "Disphenocingulum", "Dodecahedron", "DodecahedronFiveCompound", \
> "DodecahedronIcosahedronCompound", "DodecahedronSixCompound", \
> "DodecahedronSmallTriambicIcosahedronCompound", \
> "DodecahedronTwoCompound", "DuerersSolid", "Echidnahedron", \
> "ElongatedDodecahedron", "ElongatedPentagonalCupola", \
> "ElongatedPentagonalDipyramid", "ElongatedPentagonalGyrobicupola", \
> "ElongatedPentagonalGyrobirotunda", \
> "ElongatedPentagonalGyrocupolarotunda", \
> "ElongatedPentagonalOrthobicupola", \
> "ElongatedPentagonalOrthobirotunda", \
> "ElongatedPentagonalOrthocupolarotunda", \
> "ElongatedPentagonalPyramid", "ElongatedPentagonalRotunda", \
> "ElongatedSquareCupola", "ElongatedSquareDipyramid", \
> "ElongatedSquareGyrobicupola", "ElongatedSquarePyramid", \
> "ElongatedTriangularCupola", "ElongatedTriangularDipyramid", \
> "ElongatedTriangularGyrobicupola", \
> "ElongatedTriangularOrthobicupola", "ElongatedTriangularPyramid", \
> "EschersSolid", "GreatDodecahedron", "GreatIcosahedron", \
> "GreatRhombicosidodecahedron", "GreatRhombicTriacontahedron", \
> "GreatRhombicuboctahedron", "GreatStellatedDodecahedron", \
> "GyrateBidiminishedRhombicosidodecahedron", \
> "GyrateRhombicosidodecahedron", "Gyrobifastigium", \
> "GyroelongatedPentagonalBicupola", \
> "GyroelongatedPentagonalBirotunda", "GyroelongatedPentagonalCupola", \
> "GyroelongatedPentagonalCupolarotunda", \
> "GyroelongatedPentagonalPyramid", "GyroelongatedPentagonalRotunda", \
> "GyroelongatedSquareBicupola", "GyroelongatedSquareCupola", \
> "GyroelongatedSquareDipyramid", "GyroelongatedSquarePyramid", \
> "GyroelongatedTriangularBicupola", "GyroelongatedTriangularCupola", \
> "Hebesphenomegacorona", "Icosahedron", "IcosahedronFiveCompound", \
> "IcosahedronSixCompound", "IcosahedronTwoCompound", \
> "Icosidodecahedron", "JessensOrthogonalIcosahedron", \
> "MathematicaPolyhedron", "MetabiaugmentedDodecahedron", \
> "MetabiaugmentedHexagonalPrism", \
> "MetabiaugmentedTruncatedDodecahedron", \
> "MetabidiminishedIcosahedron", \
> "MetabidiminishedRhombicosidodecahedron", \
> "MetabigyrateRhombicosidodecahedron", \
> "MetagyrateDiminishedRhombicosidodecahedron", \
> "ObtuseGoldenRhombohedron", "Octahedron", "OctahedronFiveCompound", \
> {"OctahedronFourCompound", 1}, {"OctahedronFourCompound",
>  2}, "OctahedronTenCompound", "OctahedronThreeCompound", \
> "ParabiaugmentedDodecahedron", "ParabiaugmentedHexagonalPrism", \
> "ParabiaugmentedTruncatedDodecahedron", \
> "ParabidiminishedRhombicosidodecahedron", \
> "ParabigyrateRhombicosidodecahedron", \
> "ParagyrateDiminishedRhombicosidodecahedron", "PentagonalCupola", \
> "PentagonalGyrobicupola", "PentagonalGyrocupolarotunda", \
> "PentagonalHexecontahedron", "PentagonalIcositetrahedron", \
> "PentagonalOrthobicupola", "PentagonalOrthobirotunda", \
> "PentagonalOrthocupolarotunda", "PentagonalPrismSixCompound", \
> "PentagonalRotunda", "PentakisDodecahedron", {"Prism", 3}, {"Prism",
>  5}, {"Prism", 6}, {"Prism", 7}, {"Prism", 8}, {"Prism",
>  9}, {"Prism", 10}, {"Pyramid", 4}, {"Pyramid",
>  5}, "RhombicDodecahedron", {"RhombicDodecahedronStellation",
>  2}, {"RhombicDodecahedronStellation",
>  3}, "RhombicEnneacontahedron", "RhombicHexecontahedron", \
> "RhombicIcosahedron", "RhombicTriacontahedron", \
> "SmallRhombicosidodecahedron", "SmallRhombicuboctahedron", \
> "SmallStellatedDodecahedron", "SmallTriakisOctahedron", \
> "SmallTriambicIcosahedron", "SnubCube", "SnubDisphenoid", \
> "SnubDodecahedron", "SnubSquareAntiprism", "Sphenocorona", \
> "Sphenomegacorona", "SquareCupola", "SquareGyrobicupola", \
> "SquareOrthobicupola", "SquashedDodecahedron", "StellaOctangula", \
> "SzilassiPolyhedron", "Tetrahedron", "TetrahedronFiveCompound", \
> {"TetrahedronFourCompound", 1}, {"TetrahedronFourCompound",
>  2}, {"TetrahedronFourCompound",
>  3}, "TetrahedronSixCompound", "TetrahedronTenCompound", \
> "TetrahedronThreeCompound", "TetrahedronTwoCompound", \
> "TetrakisHexahedron", "TriakisIcosahedron", "TriakisTetrahedron", \
> "TriangularCupola", "TriangularHebesphenorotunda", \
> "TriangularOrthobicupola", "TriaugmentedDodecahedron", \
> "TriaugmentedHexagonalPrism", "TriaugmentedTriangularPrism", \
> "TriaugmentedTruncatedDodecahedron", "TridiminishedIcosahedron", \
> "TridiminishedRhombicosidodecahedron", \
> "TrigyrateRhombicosidodecahedron", "TruncatedCube", \
> "TruncatedDodecahedron", "TruncatedIcosahedron", \
> "TruncatedOctahedron", "TruncatedTetrahedron"}
>
> For ones that have:
> v =PolyhedronData["TruncatedCube", "VertexCoordinates"]
> Length[v]=24.
>



  • Prev by Date: Dancing "a la Levenberg-Marquardt" to get the best Logistic Model.
  • Next by Date: Re: The simple command x=0;Dynamic[x=x+1]
  • Previous by thread: need to find polyhedrons with less than a 24 vertex array in PolyhedronData[]
  • Next by thread: having trouble with a data transfer issue