fexpit: Helper function: expanded expit

In JordanVeldboom/compartmap: A/B compartment inference from ATAC-seq and methylation array data

Description

Helper function: expanded expit

Usage

fexpit(x, sqz = 0.000001)

Arguments

x	a vector of values between -Inf and +Inf
sqz	the amount by which we 'squoze', default is .000001

Value

   a vector of values between 0 and 1 inclusive

Examples

  set.seed(1234)
  x <- rnorm(n=1000)
  summary(x) 

  sqz <- 1 / (10**6)
  p <- fexpit(x, sqz=sqz)
  summary(p)

  all( (abs(x - flogit(p)) / x) < sqz )
  all( abs(x - flogit(fexpit(x))) < sqz )

JordanVeldboom/compartmap documentation built on July 3, 2020, 6:32 p.m.