Nothing
name <- function(name, path) {
path <- basename(path)
if (identical(name, "")) {
return(path)
}
if (grepl("[.]", name)) {
err("Name '", name, "' must not include an extension.",
.subclass = "flobr_error"
)
}
p0(name, ".", tools::file_ext(path))
}
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.