Трехмерный параметрический график с автоматическим выбором большинства опций.
-Graphics3D- |
Тот же график с заданием ряда специфических опций.
-Graphics3D- |
Эта команда генерирует длинный список графических примитивов, изображающих точку.
Здесь из списка выбирается пять элементов.
Take[%,5]
|
График, соответствующий списку примитивов.
Show[Graphics[gr, Frame-> True]] -Graphics- |
Создание списка трехмерных примитивов, изображающих куб.
gr=Flatten[Table[If[Mod[Multinomial[x,y,z],2]==1, Cuboid[1.2{x,y,-z}],{}],{x,0,15}, {y,0,15},{z,0,15}]]; |
Выбор первых пяти элементов в списке.
Take[%,5] {Cuboid[{0,0,0}], Cuboid[{0,0,-1.2}], Cuboid[{0,0,-2.4}] ,Cuboid[{0,0,-3.6}], Cuboid[{0,0,-4.8}]} |
Эта команда рисует график, соответствующий списку примитивов.
Show[Graphics3D[gr]] - Graphics3D - |
Чтобы увидеть анимацию, щелкните мышью по графику.
Это еще один пример анимации.
Эта команда производит звук с заданной формой волны.
-Sound-
|