Nothing
#' Reload a package
#'
#' Reload a package by first detaching and loading the library.
#'
#'
#' @param pkg Character string, name of the package
#' @return Side effect is used.
#' @note So far only character is accepted
#' @author Jitao David Zhang <jitao_david.zhang@@roche.com>
#' @seealso \code{\link{detach}} and \code{\link{library}}
#' @examples
#'
#' ## the example should not run because it will reload the package
#' \dontrun{
#' reload(ribiosUtils)
#' }
#' @export reload
reload <- function(pkg) {
pkg <- as.character(substitute(pkg))
name <- sprintf("package:%s", pkg)
if(name %in% search())
detach(name, unload=TRUE, character.only=TRUE)
library(pkg, character.only=TRUE)
}
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.