R/Zfit.R

Zfit <-
function(dat, p.null){
    Zvec <- apply(dat[,3:4], MARGIN=1, Zstat, p.null=p.null)
    gname0 = as.vector(dat[,2])
    names(Zvec) = gname0
    return(Zvec)
    }

Try the sgRSEA package in your browser

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

sgRSEA documentation built on May 2, 2019, 2:47 p.m.