I'm an artist trying out digital media. I'm very new to Mathematica, however, so excuse me if this a basic question (which I'm sure it is). I did look, though, for anything on this site related to my situation.
I've created a Graphics3D
object composed of many shapes, something like
mypoly = Show[Scale[Cone[], {1, 2, 2}], Cylinder[], Rotate[Cylinder...
Everything is working properly, and it looks fine, but I'd like to move it around (rotate it and actually move it in the coordinate space). Apart from individually changing the rotation and center of each component (e.g., Sphere[{1, 0, 0}]
), is there something I can do to manipulate one iteration of the whole figure?
Ultimately, I'm going to be creating a bunch of different copies of the object and combining them.
UPDATE:
My attempt at translating the whole figure inspired by this question:
unit = Show[Graphics3D[Cylinder[]], Graphics3D[Scale[Cone[]...
newUnit = Graphics3D[Translate[unit, {1, 0, 0}]]
This only gives me the error "Graphics is not a Graphics3D primitive or directive."
Rotation, however, seems to work fine, though I run into trouble with Show[]
:
newUnit = Rotate[unit, 180 Degree]
Show[unit, newUnit] //Could not combine the graphics objects in Show[]
TranslationTransform
,RotationTransform
,ScalingTransform
andReflectionTransform
. A real nice feature is you can apply multiple transforms to a graphics object. $\endgroup$