JCCorrect = function(pval){
z = stats::qnorm(pval,lower.tail = F)
res= nullParaEst(z)
pval.JC = stats::pnorm(z,mean = res$mu,sd = res$s,lower.tail = F)
return(pval.JC)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.