Mathematica 9 is now available
Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1993

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

Search the Archive


  • To: mathgroup <mathgroup at>
  • Subject: lines(t)
  • From: Susan Rempe <rempe at>
  • Date: Mon, 8 Mar 1993 10:50:04 -0800 (PST)

HI Mathgroup,
	I want to animate a picture of points moving and a line connecting

$RasterFunction = Identity

pts[t_] :={Point[{Sin[t],Cos[t],Sin[t]+Cos[t]}],

lines[t_] :=Line[{{Sin[t],Cos[t],Sin[t]+Cos[t]},

        Graphics3D[{PointSize[.05], N[ pts[t]]},
                 PlotRange -> {{-1.5, 1.5},{-1.5,1.5},{-1.5,1.5}}],


	The above code animates points.  Where do I put lines[t] so
both points and lines are animated???????

	Thanks for your help.

	Susan Rempe
	rempe at

  • Prev by Date: RE: Integrate (deutsch)
  • Next by Date: Digital Plots
  • Previous by thread: RE: Integrate (deutsch)
  • Next by thread: Digital Plots