R/wide_screen.R

In mustafaascha/mustafamisc: My miscellaneous functions

#' Wide screen
#'
#' Adjust R output to current terminal width (UNIX)
#'
#' @param howWide Accepts numeric input, but it's better to
#'  let the function do its work
#'
#' @examples
#'  wide_screen()
#'
#' @export
wide_screen <- function(howWide = Sys.getenv("COLUMNS")) {
  options(width = as.integer(howWide))
}