R/trans.Fisher.R

In iDINGO: Integrative Differential Network Analysis in Genomics

Defines functions trans.Fisher

Documented in trans.Fisher

trans.Fisher <-  function(x) {
  x[x>=(1-1e-07)] <- 1 - 1e-07
  x[x<=(-1+1e-07)] <- -1 + 1e-07
  return(log((1+x)/(1-x))/2)
}

Try the iDINGO package in your browser