myfun <- function ( ) {
n = ani.options("nmax")
x = sample(1:n)
y = sample(1:n)
for (i in 1:n) {
plot(x[i], y[i], cex = 3, col = 3, pch = 3, , lwd = 2,
ylim = c(0, 50),
xlim = c(0, 50))
ani.pause()
}
}
ani.start()
par(mar = c(3, 3, 1, 0.5), mgp = c(1.5, 0.5, 0), tcl = -0.3)
myfun()
ani.stop()
12 Dec 2011
Animation Newby Excercise with R-Package {animation}
Try this very simple & illustrative example for creating an animation with the animation package:
Subscribe to:
Post Comments
(
Atom
)

No comments :
Post a Comment