#' Writes data to clipboard
#'
#'
#' @rdname write.clip
#' @references
#' Writes data to clipboard
#' @param dec decimal seperator, default is ","
#' @param column.names column.names = TRUE is default
#' @param row.names row.names = FALSE is default
#' @export
#' @rdname write.clip
write.clip <- function (x, dec = ",",col.names=TRUE, row.names=FALSE) {
write.table(x, "clipboard", sep="\t", dec = ",",col.names=TRUE, row.names=FALSE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.