#' Converts a Date into date format
#'
#' @param date Date("date"), POSIX("date"), etc.; Date to convert
#' @return Character string in date format "%e. %B %Y"
#' @export
textfunc.datoformat <- function(date) {
return(trimws(format(date, "%e. %B %Y")))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.