Nothing
#' Save text (a container of strings) to a file
#' @param filename filename of the file to have the text written to
#' @param lines lines of text to be written to file
#' @return Nothing. Will save the lines to file
#' @author Richèl J.C. Bilderbeek
#' @examples
#' text <- c("hello", "world")
#' filename <- get_beastier_tempfilename()
#' save_lines(filename = filename, lines = text)
#' file.remove(filename)
#'
#' remove_beaustier_folders()
#' @export
save_lines <- function(filename, lines) {
dir.create(dirname(filename), showWarnings = FALSE, recursive = TRUE)
my_file <- file(filename)
writeLines(lines, my_file)
close(my_file)
}
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.