#' Print the library path(s) from .libPaths()
#'
#' @details This is a helper to "pretty print" the library paths for my existing
#' session.
#'
#' @examples
#' library(learylib)
#'
#' see_lib_paths() #prints all library path(s)
#'
#' @export
see_lib_paths <- function() {
if (length(.libPaths()) > 1) {
msg <- "Using libraries at paths:\n"
} else {
msg <- "Using library at path:\n"
}
libs <- paste("-", .libPaths(), collapse = "\n")
cat(msg, libs, sep = "")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.