oopt = ani.options(htmlfile = "BM-motion-chart.html")
g.brownian.motion(15, digits = 2, width = 600, height = 500)
unlink(file.path(ani.options("outdir"), ani.options("htmlfile")))
ani.options(oopt)
Run the code above in your browser using DataLab