addTable: Add table information to nlmixr fit object without tables

In nlmixr: Nonlinear Mixed Effects Models in Population PK/PD

Add table information to nlmixr fit object without tables

Description

Add table information to nlmixr fit object without tables

Usage

addTable(
  object,
  updateObject = FALSE,
  data = object$dataSav,
  thetaEtaParameters = .foceiThetaEtaParameters(object),
  table = tableControl(),
  keep = NULL,
  drop = NULL,
  envir = parent.frame(1)
)

Arguments

object	nlmixr family of objects
updateObject	Update the object (default FALSE)
data	Saved data from
thetaEtaParameters	Intenral theta/eta parameters
table	a 'tableControl()' list of options
keep	Character Vector of items to keep
drop	Character Vector of items to drop or NULL
envir	ENvironment to search for updating

Value

Fit with table information attached

Author(s)

Matthew Fidler

Examples

one.cmt <- function() {
  ini({
    ## You may label each parameter with a comment
    tka <- 0.45 # Log Ka
    tcl <- log(c(0, 2.7, 100)) # Log Cl
    ## This works with interactive models
    ## You may also label the preceding line with label("label text")
    tv <- 3.45; label("log V")
    ## the label("Label name") works with all models
    eta.ka ~ 0.6
    eta.cl ~ 0.3
    eta.v ~ 0.1
    add.sd <- 0.7
  })
  model({
    ka <- exp(tka + eta.ka)
    cl <- exp(tcl + eta.cl)
    v <- exp(tv + eta.v)
    linCmt() ~ add(add.sd)
  })
}

# run without tables step
f <- nlmixr(one.cmt, theo_sd, "saem", control=list(calcTables=FALSE))

print(f)

# Now add the tables

f <- addTable(f)

print(f)

nlmixr documentation built on March 27, 2022, 5:05 p.m.