R/getProb_weight.R

getProb_weight <-
function(Seg, prob, familyWeightGene)
{      
    return (prod((prob^Seg*(1-prob)^(1-Seg))^familyWeightGene$weight))
}

Try the GESE package in your browser

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

GESE documentation built on May 2, 2019, 3:59 a.m.