powered by
fbumLL(parms, x)
data(pvaluesExample) pvals <- pvaluesExample[,1] bum.mle <- fitBumModel(pvals, plot=FALSE) fbumLL(parms=c(bum.mle$lambda, bum.mle$a), x=pvals)
Run the code above in your browser using DataLab