pb_tick <- function(x, pb, ...) {
pb$tick(...)
return(x)
}
pb_new <- function(x, ...) {
progress_bar$new(
total = length(x),
...
)$tick(0)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.