X-Git-Url: https://git.nmode.ca/Rnaught/blobdiff_plain/87cda5b1e72f033f9d02f78d9cc3b7216d2abe9d..a50ca5855eecf12908327252d627df3af076fc88:/R/WP_unknown.R diff --git a/R/WP_unknown.R b/R/WP_unknown.R index ee950b1..f339836 100644 --- a/R/WP_unknown.R +++ b/R/WP_unknown.R @@ -20,7 +20,9 @@ #' \code{J0} (the location for the maximum likelihood estimator \code{Rhat}). If \code{JJ} and \code{J0} #' are not the same, this means that the maximum likelihood estimator is not unique. #' -#' @export +#' @importFrom stats pgamma qgamma +#' +#' @keywords internal WP_unknown <- function(NT, B=100, shape.max=10, scale.max=10, tol=0.999) { shape <- seq(0, shape.max, length.out=B+1) scale <- seq(0, scale.max, length.out=B+1)