#' @export
write_tsv <- function(input_table) {
write.table(
input_table,
file = paste0(deparse(substitute(input_table)), ".tsv"),
col.name = T,
row.name = F,
sep = "\t",
quote = F
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.