SI removed

[Rnaught] / R / wp.R

diff --git a/R/wp.R b/R/wp.R
index 428f3667f80edd892b44f84d995383d48c345829..16b4bbb3730df97919b75737f4022f85c4ba7ce1 100644 (file)
--- a/R/wp.R
+++ b/R/wp.R
@@ -73,7 +73,7 @@
 #'   returned.
 #'
 #' @references [White and Pagano (Statistics in Medicine, 2008)](
-#' https://doi.org/10.1002/sim.3136)
+#'   https://doi.org/10.1002/sim.3136)
 #'
 #' @seealso `vignette("wp_serial", package="Rnaught")` for examples of using the
 #'   serial distribution.
@@ -152,9 +152,8 @@ wp <- function(cases, mu = NA, serial = FALSE,
 #'   * `pmf` - the probability mass function of the estimated serial
 #'     distribution
 #'
-#' @references
-#' [White and Pagano (Statistics in Medicine, 2008)](
-#' https://doi.org/10.1002/sim.3136)
+#' @references [White and Pagano (Statistics in Medicine, 2008)](
+#'   https://doi.org/10.1002/sim.3136)
 #'
 #' @seealso [wp()] for the function in which this grid search is called.
 #'
@@ -207,9 +206,8 @@ wp_search <- function(cases, grid_length, max_shape, max_scale) {
 #'
 #' @return The sum inside the function `mu(t)` of the log likelihood.
 #'
-#' @references
-#' [White and Pagano (Statistics in Medicine, 2008)](
-#' https://doi.org/10.1002/sim.3136)
+#' @references [White and Pagano (Statistics in Medicine, 2008)](
+#'   https://doi.org/10.1002/sim.3136)
 #'
 #' @seealso [wp()] and [wp_search()] for the functions which require this sum.
 #'