R/overmessage.R

In blackbox: Black Box Optimization and Exploration of Parameter Space

Defines functions overmessage

Documented in overmessage

overmessage <- function(msg, prevmsglength) {
  msglength <- nchar(msg)
  if (prevmsglength>0) {message("\r", appendLF=F)}  	##FR: for backslash-b see ?Quotes ...
  message(msg, appendLF=F)
  return(msglength)
}

Try the blackbox package in your browser