#' Read in a data frame in the clipboard, copied from Excel
#'
#' @param header Logical value to specify whether copied table contains a header row.
#' @param ... Additional arguments for read.table().
#' @export
read_df <- function(header=TRUE,...) {
read.table("clipboard",sep="\t",header=header,...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.