R/fisher2cor.R

Defines functions fisher2cor.D1 fisher2cor

## File Name: fisher2cor.R
## File Version: 0.08


#*** back transform fisher correlations
fisher2cor <- function(z)
{
    c1 <- ( exp(2*z) - 1 )/ ( exp(2*z) + 1 )
    return(c1)
}


#*** derivative of fisher to cor
fisher2cor.D1 <- function(z, h=.001)
{
    ( fisher2cor(z+h) - fisher2cor(z) ) / h
}

Try the miceadds package in your browser

Any scripts or data that you put into this service are public.

miceadds documentation built on May 29, 2024, 11:05 a.m.