R/depreciated/tab_sep2md.R

In JiaxiangBU/add2md: Add to Markdown

#' Copy a tab-seperated table and convert it into markdown table format
#'
#' There is no parameter for this function, easily to use, just copy, run function and paste it.
#' @importFrom clipr read_clip write_clip
#' @importFrom knitr kable
#' @export
#'
tab_sep2md <- function() {
    clipr::read_clip() %>%
        knitr::kable(format = "markdown") %>%
        clipr::write_clip()
}