R/mm.r

Defines functions mm

Documented in mm

mm <- function(ob, min.pr, max.pr){

  res <- ifelse(ob > max.pr, max.pr, ob) 
  res <- ifelse(res < min.pr, min.pr, res) 

  res
      
}
KironmoyDas/KD-STAT0035-GMupdate documentation built on Feb. 15, 2021, 12:17 a.m.