R/formatCI.R

Defines functions formatCI

Documented in formatCI

formatCI <- function(ci, sep='; ', prefix='[', suffix=']', digits=2, noZero=FALSE) {
  if (noZero) {
    return(paste0(prefix, paste0(noZero(round(ci, digits)), collapse=sep), suffix));
  } else {
    return(paste0(prefix, paste0(round(ci, digits), collapse=sep), suffix));
  }
}

Try the userfriendlyscience package in your browser

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

userfriendlyscience documentation built on Nov. 18, 2017, 4:14 a.m.