Nothing
#' Clear the stash
#'
#' Clears the hidden '.mustashe' directory.
#'
#' @param verbose Whether to print action statements (default TRUE).
#'
#' @return Returns \code{NULL} (invisibly).
#'
#' @examples
#' clear_stash()
#' @export clear_stash
clear_stash <- function(verbose = TRUE) {
if (verbose) {
message("Clearing stash.")
}
file.remove(c(
list.files(get_stash_dir(), full.names = TRUE, pattern = "qs$"),
list.files(get_stash_dir(), full.names = TRUE, pattern = "hash$")
))
invisible(NULL)
}
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.