silent_new <- function() {
silent_class$new()
}
silent_class <- R6::R6Class(
classname = "tar_silent",
inherit = reporter_class,
class = FALSE,
portable = FALSE,
cloneable = FALSE,
public = list(
report_end = function(progress = NULL, seconds_elapsed = NULL) {
invisible()
}
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.