Sunday, December 15, 2019

PolyhedronData Examples


Show[PolyhedronData["GreatRhombicosidodecahedron"] /.
        Polygon[p_]:> MapIndexed[{Glow[Hue[Mod[First[#2],64]/64]],
        Black,Opacity[0.8],Polygon[#1]} &,p],
    Boxed->False,ImageSize->Large]

Posted by at
Labels: ,

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)