R/zzz.R

In REdaS: Companion Package to the Book 'R: Einführung durch angewandte Statistik'

Defines functions pure_all.equal my.format.pval

my.format.pval <- function(p, digits){
  gsub("^0\\.", ".", format.pval(pv = round(p, digits), digits = digits, scientific = 7L))
}

pure_all.equal <- function(tgt, cur){
  return(isTRUE(all.equal.numeric(tgt, cur, check.attributes = FALSE)))
}

Try the REdaS package in your browser