#' Quickly refresh & reinstall packages
#' @export
#'
refresh <- function(pkg) {
require(devtools)
require(roxygen2)
org.dir <- getwd()
target.dir <- system(paste("find ~/R -name", pkg), intern = T)
if (org.dir != target.dir) {setwd(target.dir)}
document()
setwd("..")
install(pkg)
setwd(org.dir)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.