R/depreciated/lines2para.R

In JiaxiangBU/add2md: Add to Markdown

#' Make mutiple lines into a paragraph
#'
#' Sometimes We copy text from pdf documents and find it ugly, lines2para will deal with it.
#'
#' @export

lines2para <- function() {
    library(tidyverse)
    clipr::read_clip() %>%
        str_remove_all("\n") %>%
        str_flatten(" ") %>%
        str_replace_all("", " ") %>%
        clipr::write_clip()
}