R/isRejected.R

Defines functions isRejected

isRejected = function(stats) {
  values = sapply(stats$statistics$window2statistics, function(x) x$statistics)
  threshold = stats$criticalValue
  
  !checkStats(threshold)(values)
}
akopich/covcp documentation built on April 14, 2021, 5:54 p.m.