powered by
fisherz(rho)
cors <- seq(-.9,.9,.1) round(fisherz(cors),2) ## The function is currently defined as function(rho) {0.5*log((1+rho)/(1-rho)) } #converts r to z
Run the code above in your browser using DataLab