#' Print something
#'
#' @param r a value
#' @param x a value
#' @param y a value
#'
#' @return a value
#' @export
printer <- function(r, x, y){
print(paste0('x = ', x))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.