Skip to content
Draft
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion DESCRIPTION
Original file line number Diff line number Diff line change
Expand Up @@ -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
9 changes: 3 additions & 6 deletions R/calc_residuals.R
Original file line number Diff line number Diff line change
Expand Up @@ -32,8 +32,7 @@ calc_residuals <- function(
censoring = NULL,
censoring_idx = NULL,
data_before_init = NULL,
ltbs = FALSE,
...
ltbs = FALSE
) {

## Observation vectors
Expand Down Expand Up @@ -61,8 +60,7 @@ calc_residuals <- function(
iov_bins = iov_bins,
output_include = output_include,
t_init = t_init,
lagtime = lagtime,
...
lagtime = lagtime
)
})
suppressMessages({
Expand All @@ -81,8 +79,7 @@ calc_residuals <- function(
iov_bins = iov_bins,
A_init = A_init_population,
t_init = t_init,
lagtime = lagtime,
...
lagtime = lagtime
)
})

Expand Down
12 changes: 4 additions & 8 deletions R/get_map_estimates.R
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down Expand Up @@ -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)
Expand Down Expand Up @@ -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
)
})

Expand Down Expand Up @@ -426,8 +423,7 @@ get_map_estimates <- function(
censoring = censoring,
censoring_idx = censoring_idx,
data_before_init = data_before_init,
ltbs = ltbs,
...
ltbs = ltbs
)
}

Expand Down
5 changes: 1 addition & 4 deletions man/calc_residuals.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

5 changes: 1 addition & 4 deletions man/get_map_estimates.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

2 changes: 0 additions & 2 deletions man/map_shrinkage_control.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

Loading