R/format_msg.R

Defines functions format_msg

format_msg <- function(x) {
    x <- strsplit(x, split = "\n")[[1]]
    x <- trimws(x)
    x <- paste0("\n", paste(x, collapse = "\n"), "\n")
    return(x)
}

Try the modelsummary package in your browser

Any scripts or data that you put into this service are public.

modelsummary documentation built on Oct. 15, 2023, 5:06 p.m.