Nothing
#' load multiple packages
#'
#' @param pkg_name_vec a string vector of package names
#'
#'
#' @examples
#' \dontrun{
#' load.pkgs(c("dplyr", "car", "purrr"))
#' }
#'
load.pkgs <- function(pkg_name_vec){
tryCatch({
invisible(suppressMessages(lapply(pkg_name_vec, require, character.only = TRUE)))
}, error=function(e){cat("ERROR :", conditionMessage(e), "\n")})
}
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.