#' @title Get the name of a function
#'
#' @description Returns the name of the input function as a character string
#'
#' @param fcn - function name as an expression
#'
#' @return function name as character string
#'
#'@export
#'
getFunctionName<-function(fcn) {
str<-deparse(substitute(fcn,sys.frame(sys.parent())));
return(str);
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.