OrigCode/CHI_HAICalcs/RHaiFuncs_sdy404/inv_normal_transform.r

# inverse normal (rank) transformation
inv_normal_transform <- function(x){
  r = rank(x, na.last = "keep")
  p = r / (sum(!is.na(r)) + 1)
  return(qnorm(p))
}
ehfhcrc/ImmSig2 documentation built on May 16, 2019, 12:15 a.m.