Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1998
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1998

[Date Index] [Thread Index] [Author Index]

Search the Archive

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