R/FM.chi.pvalue.R

Defines functions FM.chi.pvalue

Documented in FM.chi.pvalue

FM.chi.pvalue <-
function(x){
	y=log(x)
	y=-2*sum(y)
	 p.value=pchisq(y,df=2*length(x),lower.tail=FALSE)
	list("FMstatistic"=y, "FMpvalue"=p.value)
  }

Try the PAGWAS package in your browser

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

PAGWAS documentation built on May 30, 2017, 6:40 a.m.