using Dates
using Pumas
using PumasUtilities
using CairoMakie
using DataFramesMeta
using PharmaDatasets

Fitting models with Pumas
Some functions in this tutorial are only available after you load the PumasUtilities
package.
1 Fitting a PK model
In this tutorial we will go through the steps required to fit a model in Pumas.
We’ll show two models:
- proportional error model
- additive error model
Additionally, we’ll learn how to compare both models and make a decision on which model is more appropriate for the data.
1.1 Pumas’ workflow
- Define a model. It can be a
PumasModel
or aPumasEMModel
. - Define a
Subject
andPopulation
. - Fit your model.
- Perform inference on the model’s population-level parameters (also known as fixed effects).
- Predict from a fitted model using the empirical Bayes estimate or Simulate random observations from a fitted model using the sampling distribution (also known as likelihood).
- Model diagnostics and visual predictive checks.
Pumas modeling is a highly iterative process. Eventually you’ll probably go back and forth in the stages of workflow. This is natural and expected in Pumas’ modeling. Just remember to have good code organization and version control for all of the workflow iterations.
Objects of PumasModel
are created with the @model
macro and they represent NLME models, i.e. models that we fit with iterative maximum likelihood estimates with first order (conditional) dynamics FO
/FOCE
/LaplaceI
.
PumasEMModel
are created with the @emmodel
macro and they represent SAEM
models, i.e. models that we fit using stochastic aproximation of the expectation-maximization estimation method.
1.1.1 Defining a model in Pumas
To define a model in Pumas, you can use either the macros or the function interfaces. We will cover the macros interface in this lesson.
To define a model using the macro interface, you start with a begin .. end
block of code with @model
:
= @model begin end my_model
PumasModel
Parameters:
Random effects:
Covariates:
Dynamical system variables:
Dynamical system type: No dynamical model
Derived:
Observed:
This creates an empty model. Now we need to populate it with model components. These are additional macros that we can include inside the @model
definition. We won’t be covering all the possible macros that we can use in this lesson, but here is the full list:
@param
, fixed effects specifications.@random
, random effects specifications.@covariates
, covariate names.@pre
, pre-processing variables for the dynamic system and statistical specification.@dosecontrol
, specification of any dose control parameters present in the model.@vars
, shorthand notation.@init
, initial conditions for the dynamic system.@dynamics
, dynamics of the model.@derived
, statistical modeling of dependent variables.@observed
, model information to be stored in the model solution.
The model components are marked by special macros. A macro in Julia behaves somewhat like a function and is marked with a @
character. These model components should be placed inside the @model
macro.
1.1.1.1 Model parameters with @param
Ok, let’s start with our model_proportional
using the macro @model
interface.
First, we’ll define our parameters with the @param
macro:
@param begin
∈ Domain(...)
ParameterName ...
end
To use the “in” (∈
) operator in Julia, you can either replace ∈
for in
or type \in <TAB>
for the Unicode character.
By using the begin ... end
block we can specify one parameter per line.
Regarding the Domain(...)
, Pumas has several types of domains for you to specify in your @param
block. Here is a list:
RealDomain
for scalar parametersVectorDomain
for vectorsPDiagDomain
for positive definite matrices with diagonal structurePSDDomain
for general positive semi-definite matrices
PDiagDomain
and PSDDomain
are generally used for between-subject variability (BSV) covariance matrices.
By using PDiagDomain
we are implying that the BSV are independent, i.e. they are not allowed to have covariance, since the off-diagonal elements are turned off by default.
Whereas, by using PSDDomain
we are implying that the BSV are not independent, i.e. they are allowed to have covariance, since we have a full covariance matrix instead of a diagonal one.
If you don’t specify any arguments inside the domain constructor it will either error (for some domains that have required arguments) or will use the defaults. In the case of the RealDomain()
without arguments it just uses the following arguments:
RealDomain(; lower = -∞, upper = ∞, init = 0)
@param begin
∈ RealDomain(; lower = 0) # typical clearance
tvcl ∈ RealDomain(; lower = 0) # typical central volume of distribution
tvvc ∈ PDiagDomain(2) # between-subject variability
Ω ∈ RealDomain(; lower = 0) # residual variability
σ end
We will be using the convention to name population-specific parameters (also commonly referred to as typical values) as tv*
.
For example, typical clearance will be named as tvcl
.
1.1.1.2 Subject parameters with @random
Second, we’ll define our subject-specific parameters (commonly known as our etas, η
, or random effects) with the @random
macro:
@random begin
~ MvNormal(Ω) # multi-variate Normal with mean 0 and covariance matrix Ω
η end
Here we are using the random assignment with the tilde notation, as in η ~ Distribution(...)
. This means that the parameter η
is distributed as some distribution Distribution
with certain parameters.
In our case, η
comes from a multivariate normal distribution (MvNormal
) with a single positional argument Ω
which itself is a positive diagonal covariance matrix. This way of instantiating a multivariate normal distribution implies that the mean vector is a vector filled with 0
s. Hence, our η
is a vector of the same length as Ω
’s dimensionality, i.e. vector of length 2.
You can use any distribution in the @random
block. For a full list of distributions, check the Pumas @random
documentation.
You don’t need to be constrained to normal or multivariate normal. Don’t forget to check the Beyond Gaussian Random Effects tutorial.
1.1.1.3 Pre-processing variables with @pre
We can specify all the necessary variable and statistical pre-processing with the @pre
macro.
The @pre
block is traditionally used to specify the inputs of the Ordinary Differential Equations (ODE) system used for non-linear mixed-effects PK/PD models (NLME).
We can also use @pre
to specify variable transformations.
Here, we are defining all the individual PK parameters, i.e. the typical values with the added η
s:
@pre begin
= tvcl * exp(η[1])
CL = tvvc * exp(η[2])
Vc end
We will be using the convention to name subject-specific PK parameters (also commonly referred to as individual coefficients or icoefs) with uppercase.
For example, the subject-specific clearance parameter will be named as CL
.
1.1.1.4 Model dynamics with @dynamics
The next block is the @dynamics
blocks. Here we specify all of the model’s dynamics, i.e. the ordinary differential equation (ODE) system:
@dynamics begin
' = -CL / Vc * Central
Centralend
We specify one ODE per line inside the @dynamics
block. The syntax is:
' = transformation * Compartment Compartment
This means that the rate of change, i.e. the derivative, of the compartment Compartment
is equal to a transformation of the current values of the compartment Compartment
. It is very similar to the textbook/paper math notation that you see in most pharmacometrics resources.
We can name our compartments whatever we want. In our example, we are naming the central compartment simply as Central
.
You can also use aliases for the most common compartment models as a shortcut. Check the Pumas documentation on the predefined ODEs.
For example, the Central1
alias corresponds to the following @dynamics
block:
' = -(CL / Vc) * Central Central
If you are using the aliases, don’t forget to adjust the variables’ naming in the @pre
block accordingly.
Under the hood Pumas performs some checks on your ODE system specified in the @dynamics
block.
First, Pumas will check if the ODE is linear, and, if possible, will replace your ODE system by a simple matrix exponentiation operation, which is faster than the analytical closed form solution.
Second, Pumas will check if the ODE system is a stiff ODE system, and adjust the numerical solver accordingly.
This means that you don’t need to think about numerical details of your ODE system. Just focus on the dynamics and let Pumas take care of the rest.
1.1.1.5 Statistical modeling of dependent variables with @derived
Our final block, @derived
, is used to specify all the assumed distributions of observed variables that are derived from the blocks above. This is where we include our dependent variable/observation: dv
and any other intermediate values that we need to calculate:
@derived begin
= @. 1_000 * Central / Vc # Change of units
cp ~ @. Normal(cp, cp * σ)
dv end
Note that dv
is being declared as following a Normal
distribution with the same tilde notation ~
as we used in the @random
block. It means (much like the mathematical model notation) that dv
follows a Normal
distribution. Since dv
is a vector of values, we need to broadcast, i.e. vectorize, the operation with the dot .
operator:
~ Normal.(μ, σ) dv
where μ
and σ
are the parameters that parametrizes the distribution, and in this case are the mean and standard deviation respectively. We can use the @.
macro which tells Julia to apply the .
in every operator and function call after it:
~ @. Normal(μ, σ) dv
We are using the @.
macro which tells Julia to vectorize (add the “dot syntax”) to all operations and function calls to the right of it.
Additionally, we are also calculating an intermediate variable cp
which represents the concentration in plasma.
Here we are using a deterministic assignment with the equal sign =
. This means that the calculation of cp
is deterministically equal to the values of the Central
compartment divided by the individual volume of the Central
compartment PK parameter, Vc
, scaled by a thousands units. Hence, the multiplication by a 1_000
.
In this block we can use all variables defined in the previous blocks, in our example the @param
, @dynamics
and @pre
blocks.
1.1.1.6 Creating two different Pumas models
We now proceed by creating two different Pumas models. Both of them are 1-compartment IV models, but with different error models.
The additive error model has a parameter σ
inside the @derived
block that, contrary to the proportional error model, is not multiplied by the mean cp
:
~ @. Normal(cp, σ) dv
= @model begin
model_proportional
@param begin
# here we define the parameters of the model
∈ RealDomain(; lower = 0) # typical clearance
tvcl ∈ RealDomain(; lower = 0) # typical central volume of distribution
tvvc ∈ PDiagDomain(2) # between-subject variability
Ω ∈ RealDomain(; lower = 0) # residual variability
σ end
@random begin
# here we define random effects
~ MvNormal(Ω) # multi-variate Normal with mean 0 and covariance matrix Ω
η end
@pre begin
# pre computations and other statistical transformations
= tvcl * exp(η[1])
CL = tvvc * exp(η[2])
Vc end
# here we define compartments and dynamics
@dynamics begin
' = -CL / Vc * Central
Centralend
@derived begin
# here is where we calculate concentration and add residual error
# tilde (~) means "distributed as"
= @. 1_000 * Central / Vc # Change of units
cp ~ @. Normal(cp, cp * σ)
dv end
end
PumasModel
Parameters: tvcl, tvvc, Ω, σ
Random effects: η
Covariates:
Dynamical system variables: Central
Dynamical system type: Matrix exponential
Derived: cp, dv
Observed: cp, dv
= @model begin
model_additive
@param begin
# here we define the parameters of the model
∈ RealDomain(; lower = 0) # typical clearance
tvcl ∈ RealDomain(; lower = 0) # typical central volume of distribution
tvvc ∈ PDiagDomain(2) # between-subject variability
Ω ∈ RealDomain(; lower = 0) # residual variability
σ end
@random begin
# here we define random effects
~ MvNormal(Ω) # multi-variate Normal with mean 0 and covariance matrix Ω
η end
@pre begin
# pre computations and other statistical transformations
= tvcl * exp(η[1])
CL = tvvc * exp(η[2])
Vc end
# here we define compartments and dynamics
@dynamics begin
' = -CL / Vc * Central
Centralend
@derived begin
# here is where we calculate concentration and add residual error
# tilde (~) means "distributed as"
= @. 1_000 * Central / Vc # Change of units
cp ~ @. Normal(cp, σ)
dv end
end
PumasModel
Parameters: tvcl, tvvc, Ω, σ
Random effects: η
Covariates:
Dynamical system variables: Central
Dynamical system type: Matrix exponential
Derived: cp, dv
Observed: cp, dv
1.1.2 Define a Subject
and Population
Once we have our model defined we have to specify a Subject
or a Population
.
In Pumas, subjects are represented by the Subject
type and collections of subjects are represented as vectors of Subject
s are defined as Population
.
Subjects
can be constructed with the Subject
constructor, for example:
Subject(; id = 1)
Subject
ID: 1
We just constructed a Subject
that has ID
equal to 1
and no extra information.
Since a Population
is just a vector of Subjects
, we can use a simple map
function over the a list of ID
s:
= map(i -> Subject(; id = i), 1:10) pop1
Population
Subjects: 10
Observations:
Or we can construct the vector of Subjects
manually:
= [Subject(; id = 1), Subject(; id = 2)] pop2
Population
Subjects: 2
Observations:
pop1 isa Population
true
pop2 isa Population
true
As you can see a Vector
of Subjects
will always be a Population
.
1.1.2.1 Reading Subject
s directly from a DataFrame
Of course we don’t want to create Subject
s and Population
s manually. We generally have the data represented in some sort of tabular data format, e.g. CSV or Excel files.
Don’t forget to check the Data Wrangling - Reading and Writing Data tutorial.
We can parse a DataFrame
into a Population
(or Subject
in the case of a single subject data) with the read_pumas
function.
The read_pumas
function accepts as first argument a DataFrame
followed by the following keyword arguments:
observations
: dependent variables specified by a vector of column names, i.e.[:DV]
.covariates
: covariates specified by a vector of column names.id
: specifies the unique Subject ID column of theDataFrame
.time
: specifies the time column of theDataFrame
.amt
: specifies the amount column of theDataFrame
.evid
: specifies the event unique ID (EVID) column of theDataFrame
.
The read_pumas
function has more keywords arguments and options than described above. Don’t forget to check the Pumas documentation on read_pumas
.
1.1.2.2 The iv_sd_3
dataset
In our example, we’ll be using the iv_sd_3
(intravenous single dose 3) dataset from the PharmaDatasets
package. This package has several pharma-related datasets ready to be used in the most common pharmacometrics workflows, such as in our example, PK model fitting.
= dataset("iv_sd_3")
pkdata first(pkdata, 5)
Row | id | time | cp | dv | amt | evid | cmt | rate | dosegrp |
---|---|---|---|---|---|---|---|---|---|
Int64 | Float64 | Float64? | Float64? | Float64? | Int64 | Int64 | Float64 | Int64 | |
1 | 1 | 0.0 | missing | missing | 10.0 | 1 | 1 | 0.0 | 10 |
2 | 1 | 0.25 | 239.642 | 233.091 | missing | 0 | 1 | 0.0 | 10 |
3 | 1 | 0.5 | 235.243 | 270.886 | missing | 0 | 1 | 0.0 | 10 |
4 | 1 | 0.75 | 230.925 | 309.181 | missing | 0 | 1 | 0.0 | 10 |
5 | 1 | 1.0 | 226.687 | 269.433 | missing | 0 | 1 | 0.0 | 10 |
Let’s see how many different EVIDs rows we have per subject:
@by pkdata :id begin
:EVID_0 = count(==(0), :evid)
:EVID_1 = count(==(1), :evid)
end
last(pkdata, 5)
Row | id | time | cp | dv | amt | evid | cmt | rate | dosegrp |
---|---|---|---|---|---|---|---|---|---|
Int64 | Float64 | Float64? | Float64? | Float64? | Int64 | Int64 | Float64 | Int64 | |
1 | 120 | 24.0 | 366.994 | 449.561 | missing | 0 | 1 | 0.0 | 120 |
2 | 120 | 36.0 | 147.526 | 129.685 | missing | 0 | 1 | 0.0 | 120 |
3 | 120 | 48.0 | 59.3031 | 67.6517 | missing | 0 | 1 | 0.0 | 120 |
4 | 120 | 60.0 | 23.8389 | 22.5353 | missing | 0 | 1 | 0.0 | 120 |
5 | 120 | 71.9 | 9.65593 | 14.4299 | missing | 0 | 1 | 0.0 | 120 |
We won’t be covering data wrangling here. Please check the Pumas Data Wrangling tutorials.
As you can see, we have 120 subjects each with one dosing row (evid == 1
)and 15 measurement rows (evid == 0
).
Each one of the subjets is being given a dose of 10 units intravenous at time 0.
Additionally we have a :dv
column with the observations for the measurement rows.
Let’s parse the pkdata
DataFrame
into a Population
with the read_pumas
function:
= read_pumas(
pop
pkdata;= [:dv],
observations = :id,
id = :time,
time = :amt,
amt = :evid,
evid )
Population
Subjects: 120
Observations: dv
1.1.3 Fit your model
Now we are ready to fit our model! We already have a model specified, model_proportional
and model_additive
, along with a Population
: pop
. We can proceed with model fitting.
Model fiting in Pumas has the purpose of estimating parameters and is done by calling the fit
function with the following positional arguments:
- Pumas model.
- a
Population
. - a named tuple of the initial parameter values.
- an inference algorithm.
1.1.3.1 Initial Parameter Values
We already covered model and Population
, now let’s talk about initial parameter values. It is the 3rd positional argument inside fit
.
You can specify you initial parameters as a named tuple. For instance, if you want to have a certain parameter, tvcl
, as having an initial value as 1
, you can do so by passing it inside a named tuple in the 3rd positional argument of fit
:
fit(model, population, (; tvcl = 1.0))
You can also use the helper function init_params
which will recover all the initial parameters we specified inside the model’s @param
block.
Let’s define a named tuple with the initial parameters values and name it iparams
:
= (; tvcl = 1, tvvc = 10, Ω = Diagonal([0.09, 0.09]), σ = 0.3) iparams
(tvcl = 1,
tvvc = 10,
Ω = [0.09 0.0; 0.0 0.09],
σ = 0.3,)
For Ω
, since it lies in the PDiagDomain
, we are using a diagonal matrix (created with Diagonal
by passing a vector where the components are the diagonal entries) as the initial value.
1.1.3.2 Inference Algorithms
Finally, our last (4th) positional argument is the choice of inference algorithm.
Pumas has the following available inference algorithms:
Marginal Likelihood Estimation:
NaivePooled()
: first order approximation without random-effects.FO()
: first-order approximation.FOCE()
: first-order conditional estimation with automatic interaction detection.LaplaceI()
: second-order Laplace approximation.
Bayesian with Markov Chain Monte Carlo (MCMC):
BayesMCMC()
: MCMC using No-U-Turn Sampler (NUTS).
We can also use a Maximum A Posteriori (MAP) estimation procedure for any marginal likelihood estimation algorithm. You just need to call the MAP()
constructor with the desired marginal likelihood algorithm inside, for instance:
fit(model, population, init_params(model), MAP(FOCE()))
Ok, we are ready to fit our model. Let’s use the FOCE
:
= fit(model_proportional, pop, iparams, FOCE()) fit_proportional
[ Info: Checking the initial parameter values.
[ Info: The initial negative log likelihood and its gradient are finite. Check passed.
Iter Function value Gradient norm
0 1.287102e+04 2.175890e+03
* time: 0.024455785751342773
1 9.966790e+03 7.267813e+02
* time: 1.0164549350738525
2 9.530310e+03 5.388719e+02
* time: 1.0982458591461182
3 9.441794e+03 1.704334e+02
* time: 1.1709349155426025
4 9.413161e+03 7.105680e+01
* time: 1.2431538105010986
5 9.408707e+03 4.180099e+01
* time: 1.3494529724121094
6 9.404627e+03 3.771692e+01
* time: 1.4199318885803223
7 9.402418e+03 3.621230e+01
* time: 1.4892678260803223
8 9.400119e+03 3.839299e+01
* time: 1.553602933883667
9 9.396350e+03 7.333659e+01
* time: 1.6219849586486816
10 9.389051e+03 1.097953e+02
* time: 1.7050998210906982
11 9.379940e+03 9.319034e+01
* time: 1.7721610069274902
12 9.376311e+03 2.014382e+01
* time: 1.8407208919525146
13 9.375988e+03 1.192272e+01
* time: 1.9123358726501465
14 9.375925e+03 4.549414e+00
* time: 1.9980947971343994
15 9.375900e+03 4.852128e+00
* time: 2.059513807296753
16 9.375861e+03 4.819367e+00
* time: 2.119846820831299
17 9.375777e+03 4.366774e+00
* time: 2.1826698780059814
18 9.375687e+03 4.860785e+00
* time: 2.2493767738342285
19 9.375637e+03 2.345193e+00
* time: 2.337171792984009
20 9.375629e+03 4.676144e-01
* time: 2.3998219966888428
21 9.375628e+03 2.889481e-02
* time: 2.4572598934173584
22 9.375628e+03 1.919920e-03
* time: 2.5099239349365234
23 9.375628e+03 1.919876e-03
* time: 2.6093478202819824
24 9.375628e+03 1.919876e-03
* time: 2.7623398303985596
25 9.375628e+03 1.919876e-03
* time: 2.9116199016571045
FittedPumasModel
Successful minimization: true
Likelihood approximation: FOCE
Likelihood Optimizer: BFGS
Dynamical system type: Matrix exponential
Log-likelihood value: -9375.6282
Number of subjects: 120
Number of parameters: Fixed Optimized
0 5
Observation records: Active Missing
dv: 1799 0
Total: 1799 0
-------------------
Estimate
-------------------
tvcl 3.8588
tvvc 70.902
Ω₁,₁ 0.092946
Ω₂,₂ 0.086108
σ 0.20577
-------------------
= fit(model_additive, pop, iparams, FOCE()) fit_additive
[ Info: Checking the initial parameter values.
[ Info: The initial negative log likelihood and its gradient are finite. Check passed.
Iter Function value Gradient norm
0 1.588465e+08 3.176814e+08
* time: 6.389617919921875e-5
1 2.150338e+07 4.299216e+07
* time: 0.05931282043457031
2 1.572596e+07 3.143684e+07
* time: 0.12170195579528809
3 6.715321e+06 1.341423e+07
* time: 0.18911194801330566
4 3.566781e+06 7.116167e+06
* time: 0.29747486114501953
5 1.747391e+06 3.476277e+06
* time: 0.36033082008361816
6 8.864643e+05 1.753370e+06
* time: 0.4207019805908203
7 4.469860e+05 8.733525e+05
* time: 0.48447585105895996
8 2.293023e+05 4.369527e+05
* time: 0.5526468753814697
9 1.203634e+05 2.180736e+05
* time: 0.6218419075012207
10 6.619611e+04 1.087875e+05
* time: 0.7197799682617188
11 3.931783e+04 5.413982e+04
* time: 0.7863309383392334
12 2.608031e+04 2.684178e+04
* time: 0.8548648357391357
13 1.964043e+04 1.321348e+04
* time: 0.9330158233642578
14 1.657783e+04 6.422866e+03
* time: 1.016554832458496
15 1.517886e+04 3.049947e+03
* time: 1.1157989501953125
16 1.458532e+04 2.325300e+03
* time: 1.195802927017212
17 1.436644e+04 2.248173e+03
* time: 1.2800788879394531
18 1.430480e+04 2.186338e+03
* time: 1.3712589740753174
19 1.429438e+04 2.151376e+03
* time: 1.4781877994537354
20 1.429364e+04 2.140132e+03
* time: 1.5546059608459473
21 1.429360e+04 2.138375e+03
* time: 1.6246237754821777
22 1.429353e+04 2.136357e+03
* time: 1.7012319564819336
23 1.429332e+04 2.132626e+03
* time: 1.7812237739562988
24 1.429278e+04 2.126512e+03
* time: 1.8778069019317627
25 1.429138e+04 2.115703e+03
* time: 1.9537479877471924
26 1.428779e+04 2.096394e+03
* time: 2.0346269607543945
27 1.427867e+04 2.060545e+03
* time: 2.1235289573669434
28 1.425620e+04 1.992853e+03
* time: 2.233433961868286
29 1.420359e+04 1.867123e+03
* time: 2.3180007934570312
30 1.409023e+04 1.653232e+03
* time: 2.404061794281006
31 1.386154e+04 1.339477e+03
* time: 2.5008487701416016
32 1.337973e+04 1.047824e+03
* time: 2.6094679832458496
33 1.234246e+04 1.048616e+03
* time: 2.6866278648376465
34 1.184183e+04 1.347805e+03
* time: 2.761910915374756
35 1.171224e+04 3.358814e+02
* time: 2.834521770477295
36 1.166954e+04 2.657564e+02
* time: 2.9059088230133057
37 1.165889e+04 2.390139e+02
* time: 2.9951977729797363
38 1.165375e+04 2.184673e+02
* time: 3.0588459968566895
39 1.164756e+04 1.786822e+02
* time: 3.1226158142089844
40 1.164727e+04 1.704844e+02
* time: 3.186051845550537
41 1.164727e+04 1.694788e+02
* time: 3.248961925506592
42 1.164727e+04 1.694343e+02
* time: 3.3058059215545654
43 1.164727e+04 1.689388e+02
* time: 3.3816728591918945
44 1.164727e+04 1.684041e+02
* time: 3.437954902648926
45 1.164726e+04 1.673538e+02
* time: 3.4967048168182373
46 1.164723e+04 1.657327e+02
* time: 3.5574729442596436
47 1.164717e+04 1.629735e+02
* time: 3.622032880783081
48 1.164701e+04 1.583893e+02
* time: 3.7051069736480713
49 1.164661e+04 1.505776e+02
* time: 3.7646689414978027
50 1.164558e+04 1.372178e+02
* time: 3.8256688117980957
51 1.164307e+04 1.144960e+02
* time: 3.8859989643096924
52 1.163736e+04 7.750730e+01
* time: 3.9522898197174072
53 1.162580e+04 8.670705e+01
* time: 4.022565841674805
54 1.160915e+04 8.563626e+01
* time: 4.109097957611084
55 1.160265e+04 4.989346e+01
* time: 4.173922777175903
56 1.160079e+04 3.988891e+01
* time: 4.233805894851685
57 1.160063e+04 3.984885e+01
* time: 4.295142889022827
58 1.160063e+04 3.991742e+01
* time: 4.356144905090332
59 1.160063e+04 3.990645e+01
* time: 4.431192874908447
60 1.160063e+04 3.990260e+01
* time: 4.482733964920044
61 1.160063e+04 3.988869e+01
* time: 4.535514831542969
62 1.160063e+04 3.987120e+01
* time: 4.588812828063965
63 1.160063e+04 3.983975e+01
* time: 4.645281791687012
64 1.160063e+04 3.979025e+01
* time: 4.705773830413818
65 1.160062e+04 3.970760e+01
* time: 4.766186952590942
66 1.160061e+04 3.957098e+01
* time: 4.8444907665252686
67 1.160059e+04 3.934001e+01
* time: 4.902935981750488
68 1.160053e+04 4.129114e+01
* time: 4.962268829345703
69 1.160037e+04 4.526013e+01
* time: 5.027450799942017
70 1.159996e+04 5.171163e+01
* time: 5.094452857971191
71 1.159889e+04 6.224566e+01
* time: 5.177519798278809
72 1.159610e+04 7.949592e+01
* time: 5.237287998199463
73 1.158885e+04 1.116231e+02
* time: 5.300915002822876
74 1.157141e+04 1.826731e+02
* time: 5.362968921661377
75 1.156713e+04 1.629541e+02
* time: 5.43094277381897
76 1.155819e+04 4.596250e+01
* time: 5.497951984405518
77 1.155714e+04 1.462578e+01
* time: 5.57844090461731
78 1.155702e+04 2.265616e+00
* time: 5.63496994972229
79 1.155702e+04 2.295916e+00
* time: 5.68691086769104
80 1.155702e+04 2.298653e+00
* time: 5.737569808959961
81 1.155702e+04 2.299166e+00
* time: 5.786846876144409
82 1.155702e+04 2.299179e+00
* time: 5.841042995452881
83 1.155702e+04 2.299201e+00
* time: 5.911049842834473
84 1.155702e+04 2.299203e+00
* time: 5.972384929656982
85 1.155702e+04 2.299207e+00
* time: 6.0322229862213135
86 1.155702e+04 2.299212e+00
* time: 6.097929000854492
87 1.155702e+04 2.299212e+00
* time: 6.205336809158325
FittedPumasModel
Successful minimization: true
Likelihood approximation: FOCE
Likelihood Optimizer: BFGS
Dynamical system type: Matrix exponential
Log-likelihood value: -11557.021
Number of subjects: 120
Number of parameters: Fixed Optimized
0 5
Observation records: Active Missing
dv: 1799 0
Total: 1799 0
-------------------
Estimate
-------------------
tvcl 3.757
tvvc 70.007
Ω₁,₁ 0.088893
Ω₂,₂ 0.081099
σ 133.33
-------------------
We can see that after a model is fitted, it prints a result with a summary and a table of the parameter estimates.
We can also recover the estimates as a named tuple with coef
:
coef(fit_proportional)
(tvcl = 3.8587845749819447,
tvvc = 70.90170218767902,
Ω = [0.09294630525180136 0.0; 0.0 0.0861077902226362],
σ = 0.20576945082036124,)
coef(fit_additive)
(tvcl = 3.7570180097041117,
tvvc = 70.0072056939088,
Ω = [0.08889313139410018 0.0; 0.0 0.08109891166474728],
σ = 133.33141056315864,)
Or as a DataFrame
with coeftable
:
coeftable(fit_proportional)
Row | parameter | estimate |
---|---|---|
String | Float64 | |
1 | tvcl | 3.85878 |
2 | tvvc | 70.9017 |
3 | Ω₁,₁ | 0.0929463 |
4 | Ω₂,₂ | 0.0861078 |
5 | σ | 0.205769 |
coeftable(fit_additive)
Row | parameter | estimate |
---|---|---|
String | Float64 | |
1 | tvcl | 3.75702 |
2 | tvvc | 70.0072 |
3 | Ω₁,₁ | 0.0888931 |
4 | Ω₂,₂ | 0.0810989 |
5 | σ | 133.331 |
Here you see the first signs that the additive error model is not a good model for this data. The σ
estimate values are off the charts.
1.1.4 Perform inference on the model’s population-level parameters
Once the model is fitted, we can analyze our inference and estimates.
We use the standard errors (SE
) along with the 95% confidence intervals with the infer
function:
= infer(fit_proportional) infer_proportional
[ Info: Calculating: variance-covariance matrix.
[ Info: Done.
Asymptotic inference results using sandwich estimator
Successful minimization: true
Likelihood approximation: FOCE
Likelihood Optimizer: BFGS
Dynamical system type: Matrix exponential
Log-likelihood value: -9375.6282
Number of subjects: 120
Number of parameters: Fixed Optimized
0 5
Observation records: Active Missing
dv: 1799 0
Total: 1799 0
---------------------------------------------------------------
Estimate SE 95.0% C.I.
---------------------------------------------------------------
tvcl 3.8588 0.10912 [ 3.6449 ; 4.0727 ]
tvvc 70.902 1.9604 [67.059 ; 74.744 ]
Ω₁,₁ 0.092946 0.015833 [ 0.061914; 0.12398]
Ω₂,₂ 0.086108 0.010604 [ 0.065325; 0.10689]
σ 0.20577 0.0037734 [ 0.19837 ; 0.21317]
---------------------------------------------------------------
= infer(fit_additive) infer_additive
[ Info: Calculating: variance-covariance matrix.
[ Info: Done.
Asymptotic inference results using sandwich estimator
Successful minimization: true
Likelihood approximation: FOCE
Likelihood Optimizer: BFGS
Dynamical system type: Matrix exponential
Log-likelihood value: -11557.021
Number of subjects: 120
Number of parameters: Fixed Optimized
0 5
Observation records: Active Missing
dv: 1799 0
Total: 1799 0
--------------------------------------------------------------
Estimate SE 95.0% C.I.
--------------------------------------------------------------
tvcl 3.757 0.13682 [ 3.4889 ; 4.0252 ]
tvvc 70.007 2.1787 [ 65.737 ; 74.277 ]
Ω₁,₁ 0.088893 0.022556 [ 0.044684; 0.1331 ]
Ω₂,₂ 0.081099 0.011052 [ 0.059438; 0.10276]
σ 133.33 10.531 [112.69 ; 153.97 ]
--------------------------------------------------------------
Also if you prefer other confidence interval band, you can choose with the keyword argument level
inside infer
.
For instance, one common band for the confidence intervals is 90%:
infer(fit_additive; level = 0.90)
We won’t be covering step 5 (predictions and simulations) of the workflow in this tutorial. The focus here is the fitting procedure and model comparisons.
You can also use the function correlation_diagnostic
to print a list of parameter pairs with high or low correlations. The rest of the pairs that were not printed have a medium correlation. You can control the threshold of high correlation with the keyword argument high_cor_threshold
, which is 0.7
by default.
correlation_diagnostic(infer_proportional)
Parameter pairs with high correlation (higher than 0.7): ("tvcl", "tvvc"), ("tvvc", "Ω₂,₂"), ("Ω₁,₁", "Ω₂,₂"), ("Ω₂,₂", "σ")
Parameter pairs with low correlation (less than 0.35): ("tvcl", "Ω₁,₁"), ("tvvc", "Ω₁,₁"), ("tvcl", "Ω₂,₂"), ("tvcl", "σ"), ("tvvc", "σ"), ("Ω₁,₁", "σ")
correlation_diagnostic(infer_additive)
Parameter pairs with high correlation (higher than 0.7): ("tvcl", "Ω₁,₁"), ("tvvc", "Ω₁,₁"), ("tvvc", "Ω₂,₂")
Parameter pairs with low correlation (less than 0.35): ("tvcl", "tvvc"), ("tvcl", "Ω₂,₂"), ("Ω₁,₁", "Ω₂,₂"), ("tvcl", "σ"), ("tvvc", "σ"), ("Ω₁,₁", "σ"), ("Ω₂,₂", "σ")
1.1.5 Model diagnostics
Finally, our last step is to assess model diagnostics.
1.1.5.1 Assessing model diagnostics
To assess model diagnostics we can use the inspect
function in our fitted Pumas models:
= inspect(fit_proportional) inspect_proportional
[ Info: Calculating predictions.
[ Info: Calculating weighted residuals.
[ Info: Calculating empirical bayes.
[ Info: Evaluating individual parameters.
[ Info: Evaluating dose control parameters.
[ Info: Done.
FittedPumasModelInspection
Fitting was successful: true
Likehood approximation used for weighted residuals : Pumas.FOCE{Optim.NewtonTrustRegion{Float64}, Optim.Options{Float64, Nothing}}(Optim.NewtonTrustRegion{Float64}(1.0, 100.0, 1.4901161193847656e-8, 0.1, 0.25, 0.75, false), Optim.Options(x_abstol = 0.0, x_reltol = 0.0, f_abstol = 0.0, f_reltol = 0.0, g_abstol = 1.0e-5, g_reltol = 1.0e-8, outer_x_abstol = 0.0, outer_x_reltol = 0.0, outer_f_abstol = 0.0, outer_f_reltol = 0.0, outer_g_abstol = 1.0e-8, outer_g_reltol = 1.0e-8, f_calls_limit = 0, g_calls_limit = 0, h_calls_limit = 0, allow_f_increases = false, allow_outer_f_increases = true, successive_f_tol = 1, iterations = 1000, outer_iterations = 1000, store_trace = false, trace_simplex = false, show_trace = false, extended_trace = false, show_warnings = true, show_every = 1, time_limit = NaN, )
)
= inspect(fit_additive) inspect_additive
[ Info: Calculating predictions.
[ Info: Calculating weighted residuals.
[ Info: Calculating empirical bayes.
[ Info: Evaluating individual parameters.
[ Info: Evaluating dose control parameters.
[ Info: Done.
FittedPumasModelInspection
Fitting was successful: true
Likehood approximation used for weighted residuals : Pumas.FOCE{Optim.NewtonTrustRegion{Float64}, Optim.Options{Float64, Nothing}}(Optim.NewtonTrustRegion{Float64}(1.0, 100.0, 1.4901161193847656e-8, 0.1, 0.25, 0.75, false), Optim.Options(x_abstol = 0.0, x_reltol = 0.0, f_abstol = 0.0, f_reltol = 0.0, g_abstol = 1.0e-5, g_reltol = 1.0e-8, outer_x_abstol = 0.0, outer_x_reltol = 0.0, outer_f_abstol = 0.0, outer_f_reltol = 0.0, outer_g_abstol = 1.0e-8, outer_g_reltol = 1.0e-8, f_calls_limit = 0, g_calls_limit = 0, h_calls_limit = 0, allow_f_increases = false, allow_outer_f_increases = true, successive_f_tol = 1, iterations = 1000, outer_iterations = 1000, store_trace = false, trace_simplex = false, show_trace = false, extended_trace = false, show_warnings = true, show_every = 1, time_limit = NaN, )
)
inspect
will perform the following procedures:
- model predictions
- residuals
- empirical Bayes estimates
- individual coefficients
- dose control parameters
Additionally, we can get all of our model metrics, such as AIC, BIC, etc. with the metrics_table
function:
metrics_table(fit_proportional)
Row | Metric | Value |
---|---|---|
String | Any | |
1 | Successful | true |
2 | Estimation Time | 2.912 |
3 | Subjects | 120 |
4 | Fixed Parameters | 0 |
5 | Optimized Parameters | 5 |
6 | dv Active Observations | 1799 |
7 | dv Missing Observations | 0 |
8 | Total Active Observations | 1799 |
9 | Total Missing Observations | 0 |
10 | Likelihood Approximation | Pumas.FOCE{Optim.NewtonTrustRegion{Float64}, Optim.Options{Float64, Nothing}} |
11 | LogLikelihood (LL) | -9375.63 |
12 | -2LL | 18751.3 |
13 | AIC | 18761.3 |
14 | BIC | 18788.7 |
15 | (η-shrinkage) η₁ | 0.013 |
16 | (η-shrinkage) η₂ | 0.024 |
17 | (ϵ-shrinkage) dv | 0.061 |
metrics_table(fit_additive)
Row | Metric | Value |
---|---|---|
String | Any | |
1 | Successful | true |
2 | Estimation Time | 6.205 |
3 | Subjects | 120 |
4 | Fixed Parameters | 0 |
5 | Optimized Parameters | 5 |
6 | dv Active Observations | 1799 |
7 | dv Missing Observations | 0 |
8 | Total Active Observations | 1799 |
9 | Total Missing Observations | 0 |
10 | Likelihood Approximation | Pumas.FOCE{Optim.NewtonTrustRegion{Float64}, Optim.Options{Float64, Nothing}} |
11 | LogLikelihood (LL) | -11557.0 |
12 | -2LL | 23114.0 |
13 | AIC | 23124.0 |
14 | BIC | 23151.5 |
15 | (η-shrinkage) η₁ | 0.301 |
16 | (η-shrinkage) η₂ | 0.132 |
17 | (ϵ-shrinkage) dv | 0.043 |
As you can the proportional error model has a lower AIC than the additive, hence it should be preferred.
But let’s take a look at visual diagnostics.
1.1.5.1.1 Goodness of Fit Plots
We can pass any result from inspect
to the goodness_of_fit
plotting function:
goodness_of_fit(
inspect_proportional;= (; resolution = (1200, 800)),
figure = (; title = "Proportional Error Model"),
axis )
┌ Warning: Found `resolution` in the theme when creating a `Scene`. The `resolution` keyword for `Scene`s and `Figure`s has been deprecated. Use `Figure(; size = ...` or `Scene(; size = ...)` instead, which better reflects that this is a unitless size and not a pixel resolution. The key could also come from `set_theme!` calls or related theming functions.
└ @ Makie ~/_work/PumasTutorials.jl/PumasTutorials.jl/custom_julia_depot/packages/Makie/6c4lt/src/scenes.jl:229
goodness_of_fit(
inspect_additive;= (; resolution = (1200, 800)),
figure = (; title = "Additive Error Model"),
axis )
┌ Warning: Found `resolution` in the theme when creating a `Scene`. The `resolution` keyword for `Scene`s and `Figure`s has been deprecated. Use `Figure(; size = ...` or `Scene(; size = ...)` instead, which better reflects that this is a unitless size and not a pixel resolution. The key could also come from `set_theme!` calls or related theming functions.
└ @ Makie ~/_work/PumasTutorials.jl/PumasTutorials.jl/custom_julia_depot/packages/Makie/6c4lt/src/scenes.jl:229
We are using some keyword arguments to customize the plot returned by the goodness_of_fit
function.
Please check Pumas’ documentation on plot customization for more details.
The weighted residuals should be standard normally distributed throughout the time and the individual predictions domain.
We see that this is the case for the proportional error model, but certainly not for the additive error model. The additive error model weighted residuals’ variance increases with the individual predictions values.
This is another indicator that the additive error model is not able to capture the data generating process.
One might also plot a QQ plot to check for normality of the residuals.
1.1.5.2 Visual Predictive Checks (VPCs)
To conclude, we can inspect visual predictive checks with the vpc_plot()
function. But first, we need to generate a VPC
object with the vpc()
function:
= vpc(fit_proportional) vpc_proportional
[ Info: Continuous VPC
Visual Predictive Check
Type of VPC: Continuous VPC
Simulated populations: 499
Subjects in data: 120
Stratification variable(s): None
Confidence level: 0.95
VPC lines: quantiles ([0.1, 0.5, 0.9])
= vpc(fit_additive) vpc_additive
[ Info: Continuous VPC
Visual Predictive Check
Type of VPC: Continuous VPC
Simulated populations: 499
Subjects in data: 120
Stratification variable(s): None
Confidence level: 0.95
VPC lines: quantiles ([0.1, 0.5, 0.9])
Now, we need to use the vpc_plot
function into our newly created VPC
object:
vpc_plot(vpc_proportional; axis = (; title = "Proportional Error Model"))
vpc_plot(vpc_additive; axis = (; title = "Additive Error Model"))
As you can see in the VPC plots above, the additive error model performs poorly in the visual predictive checks, and its quantiles even capture negative concentrations.
Hence, this is the final nail in the coffin of the additive error. Ultimately, we should prefer the proportional error model.
1.2 Conclusion
This tutorial showed how to use fit a PK model in Pumas and how to compare models.
Please try out fit
on your own data and model, and reach out if further questions or problems come up.