Merge pull request #57 from InsightRX/RXR-3044

RXR-3044: remove `...` from `get_map_estimates()`

Author: mccarthy-m-g

DESCRIPTION

@@ -12,6 +12,6 @@ Depends: utils, stats
 Imports: PKPDsim, numDeriv, mvtnorm
 Suggests: testthat (>= 3.0.0)
 Remotes: InsightRX/PKPDsim
-RoxygenNote: 7.3.2
+RoxygenNote: 7.3.3
 Encoding: UTF-8
 Config/testthat/edition: 3

R/calc_residuals.R

@@ -32,8 +32,7 @@ calc_residuals <- function(
   censoring = NULL,
   censoring_idx = NULL,
   data_before_init = NULL,
-  ltbs = FALSE,
-  ...
+  ltbs = FALSE
 ) {
 
   ## Observation vectors
@@ -61,8 +60,7 @@ calc_residuals <- function(
       iov_bins = iov_bins,
       output_include = output_include,
       t_init = t_init,
-      lagtime = lagtime,
-      ...
+      lagtime = lagtime
     )
   })
   suppressMessages({
@@ -81,8 +79,7 @@ calc_residuals <- function(
       iov_bins = iov_bins,
       A_init = A_init_population,
       t_init = t_init,
-      lagtime = lagtime,
-      ...
+      lagtime = lagtime
     )
   })
 

R/get_map_estimates.R

@@ -61,8 +61,7 @@
 #'option is `TRUE`.
 #' @param skip_hessian skip calculation of Hessian
 #' @param verbose show more output
-#' @param ... parameters passed on to `sim_ode()` function
-#' 
+#'
 #' @examples
 #' \dontrun{
 #' ## define parameters
@@ -134,8 +133,7 @@ get_map_estimates <- function(
                       verbose = FALSE,
                       A_init = NULL,
                       skip_hessian = FALSE,
-                      output_include = list(covariates = FALSE, parameters = FALSE),
-                      ...) {
+                      output_include = list(covariates = FALSE, parameters = FALSE)) {
 
   ## get prior weight for scaling of variance term
   weight_prior_var <- parse_weight_prior(weight_prior, type)
@@ -232,8 +230,7 @@ get_map_estimates <- function(
       t_max = tail(t_obs, 1) + t_init + 1,
       iov_bins = iov_bins,
       return_design = TRUE,
-      t_init = t_init,
-      ...
+      t_init = t_init
     )
   })
 
@@ -426,8 +423,7 @@ get_map_estimates <- function(
       censoring = censoring,
       censoring_idx = censoring_idx,
       data_before_init = data_before_init,
-      ltbs = ltbs,
-      ...
+      ltbs = ltbs
     )
   }