```{R setup, echo=FALSE} knitr::opts_chunk$set(eval=FALSE)

# Parameters
```{param}
TVKA = 0.5, TVCL = 1, TVV = 24, WT=70

OMEGA

@labels ECL EV EKA
0.3 0.1 0.5

SIGMA

0

Main block

double CL = exp(log(TVCL) + 0.75*log(WT/70) + ECL);
double V  = exp(log(TVV)  +      log(WT/70) + EV );
double KA = exp(log(TVKA)                   + EKA);

Model

cmt = "GUT CENT", depot = TRUE

Table

capture IPRED = CENT/V;
capture DV = IPRED*exp(EPS(1));

Outputs

CL V ECL


metrumresearchgroup/mrgsolve documentation built on Feb. 13, 2024, 10:27 p.m.