网站首页 美食营养 游戏数码 手工爱好 生活家居 健康养生 运动户外 职场理财 情感交际 母婴教育 时尚美容

用Mathematica让3D图形动起来

时间:2024-10-11 18:49:19

1、 画一个单位正方体,再让它绕z轴旋转,代码如下:Animate[Graphics3D[Rotate[Cuboid[], n Degree, {0, 0, 1}]], {n, 0, 360,1}]

用Mathematica让3D图形动起来

3、 再画一个稍微复杂的图形:Animate[Graphics3D职邗珩垃[{PointSize[0.03], Opacity[.5], Rotate[{EdgeForm[Blue], Po造婷用痃lyhedronData["TruncatedDodecahedron", "Faces"], Style[Point[ PolyhedronData["TruncatedDodecahedron", "VertexCoordinates"]], Opacity[1], Red]}, n Degree, {0, 0, 1}, {0.5, 0.5, 0}]}, Boxed -> False], {n, 0, 360, 1}]

用Mathematica让3D图形动起来
© 2025 小知经验
信息来自网络 所有数据仅供参考
有疑问请联系站长 site.kefu@gmail.com