R/pvalues.R

In jtGWAS: Efficient Jonckheere-Terpstra Test Statistics

Defines functions pvalues

Documented in pvalues

pvalues <- function(jtGWAS.object)
{
	if(attr(jtGWAS.object,'standardized'))
	 	return(2*pnorm(-abs(jtGWAS.object$J)))
	else
		 stop("This function is only to be used with standardized results.")
}

Try the jtGWAS package in your browser