Nothing
#' Assert a package is installed.
#'
#' @param pkg Character vector giving the name of a package.
#'
#' @return An error if `pkg` is not installed or invisible `pkg` if it is.
#' @export
#'
#' @examples
#' assert_is_installed("base")
#' \dontrun{
#' try(assert_is_installed("bad"))
#' }
#' @keywords internal
assert_is_installed <- function(pkg) {
if (!requireNamespace(pkg, quietly = TRUE)) {
abort(glue("Please install the {pkg} package."))
}
invisible(pkg)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.