#' Write List
#'
#' Write list to a text file.
#'
#' @param x a list.
#' @param file output filename.
#'
#' @importFrom utils capture.output
#'
#' @export
write.list <- function(x, file="")
{
txt <- capture.output(print(x))
txt <- trimws(txt)
cat(txt, sep="\n", file=file)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.