## see more examples in ?vanke1127
saveHTML({
data(vanke1127)
price.ani(vanke1127$price, vanke1127$time, lwd = 2)
}, img.name = "vanke1127", htmlfile = "vanke1127.html", title = "Stock prices of Vanke",
description = c("Barplots", "of the stock prices of Vanke Co. Ltd",
"on 2009/11/27"))
Run the code above in your browser using DataLab