pb_fun2 <- function(fun, ...) {
if (requireNamespace("pbapply")) {
pbapply::pbmapply(fun, ...)
} else {
mapply(fun, ...)
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.