# Generated by autofun (0.0.0.9000): do not edit by hand!!!
# Please edit source code in spsann-package/R-autofun/update-progress.R
.update_progress<-function(...){
expression(if (!is.null(progress)) {
if (progress == "txt") {
utils::setTxtProgressBar(pb, k)
} else {
if (progress == "tk") {
tcltk::setTkProgressBar(pb, k)
}
}
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.