#' Silly Printer Function
#'
#' @param r what you want in the second column
#' @param x what you want in the first column
#'
#' @return A tibble
#' @export
#'
#' @importFrom tibble data_frame
#' @importFrom utils head adist
#' @importFrom dplyr select
#'
#' @examples
#' printer(x = rnorm(5), r = rnorm(5))
printer = function(r,x){
x = data_frame(x = x, r = r)
print(head(x))
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.