Visualization Notes
Thursday, December 26, 2019
RotationTransform Examples
Graphics3D[Table[{ColorData["Crayola","ColorList"][[10+k]],
Opacity[.75],EdgeForm[None],
GeometricTransformation[Dodecahedron[],
RotationTransform[k*Pi/8,{1,1,0}]]},{k,8}],
Boxed->False,ImageSize->500]
No comments:
Post a Comment
Newer Post
Older Post
Home
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment