#' @export
get_path <- function(file) {
sapply(file, function(vec) {
if(grepl("/", vec)) {
gsub("(^.*/).*$", "\\1", vec)
} else {
path <- "./"
}
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.