tests/testthat/helper-quiet.R

In nlmixr2est: Nonlinear Mixed Effects Models in Population PK/PD, Estimation Routines

.nlmixr <- function(...) {
  rxode2::rxUnloadAll()
  suppressWarnings(suppressMessages(nlmixr(...)))
}
# Use these for faster estimation (when numeric results don't matter but having
# an estimation result matters). Leave calcTables = TRUE since that is often
# needed for the tests.
saemControlFast <- saemControl(print = 0, nBurn = 1, nEm = 1, nmc = 1, nu = c(1, 1, 1))
foceiControlFast <- foceiControl(print = 0, maxInnerIterations = 1, maxOuterIterations = 1, eval.max = 1)