R/expit.R

expit <- function(aa) { 
  exp_aa <- exp(aa)
  exp_aa/(1+exp_aa)
}
mercaldo/MMLB documentation built on May 22, 2019, 6:51 p.m.