Re: Animation = Translation + Vibration, But How?

*To*: mathgroup at smc.vnet.net*Subject*: [mg95174] Re: Animation = Translation + Vibration, But How?*From*: dh <dh at metrohm.com>*Date*: Thu, 8 Jan 2009 06:43:11 -0500 (EST)*References*: <gk1rso$pgl$1@smc.vnet.net> <gk2679$135$1@smc.vnet.net> <gk3ffa$e0n$1@smc.vnet.net>

Hi Gidi, e.g. look up "Animate" or: http://www.math.northwestern.edu/~wphooper/code/latex/mathematica_movie/ Daniel GidiL wrote: > On Jan 7, 2:12 pm, dh <d... at metrohm.com> wrote: >> Hi Gidi, >> >> here is a very simple aproach: >> >> lever[x_, y_, phi_?NumericQ] := Module[{length = 1}, >> >> p1 = {x, y, 0}; >> >> p2 = p1 + length { Cos[phi], 0, Sin[phi]}; >> >> Line[{p1, p2}] >> >> ]; >> >> Do[ >> >> x = 0.01 t; >> >> y = 0.01 t; >> >> phi = 0.2 Sin[0.2 t]; >> >> Show[Graphics3D[{Thickness[0.1], lever[x, y, phi]}], >> >> PlotRange -> {{0, 2}, {0, 2}, {-1, 1}}] // Print; >> >> , {t, 0, 100}] >> >> hope that this get you started, Daniel >> >> >> >> GidiL wrote: >>> Dear All! >>> I created a cantilever in Mathematica (nothing fancy, a Graphics 3D >>> object created with Polygon). >>> The only thing that I want now is to simulate its movement. I thought >>> it would be easy, but it's proving to be diabolically difficult. >>> Boundary conditions: the cantilever should be fixed in one end, and >>> allowed to oscillate in the other (the oscillations are predetermined >>> by some simple trigonometric function). >>> This system should be allowed to translate in space (a moving beam, so >>> to speak). >>> So it should be allowed to move in the X-Y plane and oscillate along >>> the Z- axis. >>> Moving it in the X-Y plane is accomplished with the Translate >>> function. But how can I make it oscillate in a specific manner? How >>> can I combine in one animation both movements? >>> Any help would be greatly apprerciated, >>> Gideon- Hide quoted text - >> - Show quoted text - > > Daniel, > > Thank you so very much! > Your suggestion spurred another question: would you happen to know how > I could combine the different frames into a single frame, which could > then be made into a QuickTime movie? > > Gideon >