Re-gen docs and prevent genning of internal functions

[Rnaught] / R / WP_internal.R

diff --git a/R/WP_internal.R b/R/WP_internal.R
index 420d0c05b2a5479448ef235561c469131ec07354..dd10d29c7ce3f36f773bd0a80919809f4d4c92fc 100644 (file)
--- a/R/WP_internal.R
+++ b/R/WP_internal.R
@@ -9,7 +9,7 @@
 #'
 #' @return The function returns the maximum likelihood estimator of R0.
 #'
-#' @keywords internal
+#' @noRd
 WP_known <- function(NT, p) {
   k <- length(p)
   TT <- length(NT) - 1
@@ -54,7 +54,7 @@ WP_known <- function(NT, p) {
 #'
 #' @importFrom stats pgamma qgamma
 #'
-#' @keywords internal
+#' @noRd
 WP_unknown <- function(NT, B = 100, shape.max = 10, scale.max = 10,
                        tol = 0.999) {
   shape <- seq(0, shape.max, length.out = B + 1)
@@ -91,14 +91,14 @@ WP_unknown <- function(NT, B = 100, shape.max = 10, scale.max = 10,
 #' This is a background/internal function called by \code{WP}. It computes the
 #' log-likelihood.
 #'
-#' @param NT Vector of case counts.
 #' @param p Discretized version of the serial distribution.
+#' @param NT Vector of case counts.
 #' @param R0 Basic reproductive ratio.
 #'
 #' @return This function returns the log-likelihood at the input variables and
 #'         parameters.
 #'
-#' @keywords internal
+#' @noRd
 computeLL <- function(p, NT, R0) {
   k <- length(p)
   TT <- length(NT) - 1