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-GMupdate15feb documentation built on Feb. 18, 2021, 12:02 a.m.