R/param_print.R

Defines functions print.uneval_parameters

#' @export
print.uneval_parameters <- function(x, ...) {
  cat(sprintf("%i unevaluated parameter%s.\n\n",
              length(x), plur(length(x))))
  res <- to_text_dots(x)
  cat(res, sep = "\n")
}
pierucci/heemod documentation built on July 17, 2022, 9:27 p.m.