Re: [R] Animated lissajous

2005-10-17 Thread Tuszynski, Jaroslaw W.
] ` \ -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Saturday, October 15, 2005 11:34 PM To: r-help@stat.math.ethz.ch Subject: [R] Animated lissajous Here's some code to make lissajous dance. I've attached a small sample GIF. Cheers

[R] Animated lissajous

2005-10-15 Thread rlist . 10 . phftt
Here's some code to make lissajous dance. I've attached a small sample GIF. Cheers, Rob Steele robsteele at yahoo dot com plot.lissajous = function(omega.x, omega.y, delta = 0, num.thetas = 200) { thetas = seq(0, 2 * pi, length = num.thetas) xs = sin(omega.x * thetas + delta) ys =

[R] Animated lissajous

2005-10-15 Thread rlist . 10 . phftt
Oh my goodness how did that bug creep in there. Ignore that last post and try this instead. Rob Steele robsteele at yahoo dot com plot.lissajous = function(omega.x, omega.y, delta = 0, num.thetas = 200) { thetas = seq(0, 2 * pi, length = num.thetas) xs = sin(omega.x * thetas + delta)