powered by
Performs a power analysis for estimating the heritability of a binomial trait. This function can take a long time to run if either nsims or nperms is large.
binomPower(ndads, mm, vv, tau2, nperms, nsims, nbins, alpha = 0.05, doPlot=FALSE)
Returns a list and an optional set of .pdfs (if doPlot==TRUE). The list contains:
a data.frame with the summarized results of the power analysis.
a numeric matrix with the paramater values.
a numeric matrix with the full results of the analysis.
a (non-empty) numeric value indicating the number of dads.
a (non-empty) numeric value indicating the mean number of offspring per dad per bin (normal dist). mm must be less than vv.
a (non-empty) numeric value indicating the variance in offspring per dad per bin (normal dist). vv. must be greater than mm.
a (non-empty) numeric value indicating the dad effect (narrow-sense heritability ~ tau2/(tau2+(pi/sqrt(3))^2)).
a (non-empty) numeric value indicating the number of bootstrap permutations to use for caluclating a p value.
a (non-empty) numeric value indicating the number of simulations to run per parameter combination.
a (non-empty) numeric value indicating the number of bins, data are pooled before analysis.
a (non-empty) numeric value indicating the cutoff for significant p values.
a (non-empty) logical value indicating whether to plot the results of the power analysis.
ndads <- c(9,18) mm <- 4.629634 vv <- 6.31339 tau2 <- c(0,0.5) nperms <- 2 nsims <- 2 nbins <- 3 doPlot <- TRUE binomPower(ndads,mm,vv,tau2,nperms,nsims,nbins,doPlot)
Run the code above in your browser using DataLab