       Re: Rotating Figures

• To: mathgroup at smc.vnet.net
• Subject: [mg15252] Re: [mg15243] Rotating Figures
• From: Ken Levasseur <Kenneth_Levasseur at uml.edu>
• Date: Mon, 28 Dec 1998 02:37:50 -0500
• Organization: UMass Lowell Mathematical Sciences
• References: <199812270858.DAA11824@smc.vnet.net.>
• Sender: owner-wri-mathgroup at wolfram.com

```Wilson:

Here is a function that takes a 3D object obj and rotates it using the
rotation matrix g.

ActionOn[obj_, g_] :=
obj /. {{a_, b_, c_} /; And @@ NumberQ /@ {a, b, c} :> g . {a, b, c}}

To see how this works, check out
http://www.uml.edu/Dept/Math/ExpAlg/eulerangle/eulerangle.shtml

Ken Levasseur

Wilson Figueroa wrote:
>
> Does anyone know how an entire figure can be passed to Mathematica and
> have that figure rotated by either a 2D or 3D transformation?
>
> For example, I could have a rotation matrix of:
>
> rot[{x_,y_}]:= {{a,b},{c,d}}.{x,y}
>
> This would take every point in the figure, apply the transformation, and
> them replot the figure.
>
> I would like to be able to do this with 2D and 3D figures or data ... as
> the case may be.
>
> Wilson
>
> Please email any responses to flip at aznet.net

```

• Prev by Date: Re: Re: Algebra on complex expressions: Collect
• Next by Date: ``Live'' Graphics
• Previous by thread: Rotating Figures
• Next by thread: Re: Rotating Figures