# \donttest{
model <- pkmodel(columnMap = FALSE,
absorption = "FirstOrder",
workingDir = tempdir())
model <- addSecondary(model, "Ke", "tvCl/tvV")
model <- addSecondary(
model, "Tmax",
"CalcTMax(tvA,tvCl/tvV)"
)
# }
Run the code above in your browser using DataLab