NMproject (version 0.6.9)

subroutine: Subroutine

Description

Makes the necessary code changes to go from one ADVAN (and TRANS) to another.

Usage

subroutine(m, advan = NA, trans = 1, recursive = TRUE)

Value

An nm object with modified ctl_contents field.

Arguments

m

An nm object.

advan

Character. desired ADVAN.

trans

Character. desired TRANS.

recursive

Logical (default = TRUE). Internal argument, do not modify.

Details

Can only switch between subroutines listed in available_advans.

See Also

advan()

Examples

# create example object m1 from package demo files
exdir <- system.file("extdata", "examples", "theopp", package = "NMproject")
m1 <- new_nm(run_id = "m1",
             based_on = file.path(exdir, "Models", "ADVAN2.mod"),
             data_path = file.path(exdir, "SourceData", "THEOPP.csv"))


advan(m1) ## 2
trans(m1) ## 1

m1 <- m1 %>% subroutine(advan = 2, trans = 2)

ds <- .available_advans %>%
  dplyr::filter(oral) %>%
  dplyr::mutate(
    m = m1 %>% child(run_id = label) %>%
      subroutine(advan = advan, trans = trans)
  )

ds

ds$m %>% dollar("PK")