powered by
plot()
swf(file = "Rplots.swf", width = 7, height = 7, bg = "white", fg = "black", frameRate = 12)
## A demonstration of K-means clustering, using animation package if(require(animation)) { swf("kmeans.swf", frameRate = 1) kmeans.ani() dev.off() }
Run the code above in your browser using DataLab