R/expit.R

In lulizou/spASE: Detecting Allele-Specific Expression in Spatial Transcriptomics

#' expit function
#'
#'
#' @description literally just the expit function
#'
#' @param x the number to expit
#' @return the expited version of x
#'
#' @export

expit <- function(x) {
  return(exp(x)/(1+exp(x)))
}