R/utilities.R

Defines functions message_wrap

# Copied from ggplot2:
# https://github.com/tidyverse/ggplot2/blob/master/R/utilities.r
message_wrap <- function(...) {
  msg <- paste(..., collapse = "", sep = "")
  wrapped <- strwrap(msg, width = getOption("width") - 2)
  message(paste0(wrapped, collapse = "\n"))
}
moderndive/moderndive documentation built on Feb. 20, 2024, 8:13 p.m.