Re: Control file for first- and zero order elimination
From: Etienne Chatelut <chatelut@icr.fnclcc.fr>
Subject: Re: Control file for first- and zero order elimination
Date: 25 Sep 1998 09:36:15 -0400
Dear Mrs Du Preez,
Please find below the control-stream we use to model parallel first- and saturable (Michaelis-Menten) (iv administration) elimination:
$PROB ADVAN6
$INPUT ID CYCL TIME DV AMT RATE EVID MDV
$DATA icrc1
$SUBROUTINES ADVAN6 TRANS1 TOL=4
$MODEL COMP=(CENTRAL,DEFOBS)
$PK
V=THETA(1)*EXP(ETA(1))
K10=THETA(2)*EXP(ETA(2))
VM=THETA(3)*EXP(ETA(3))
KM=THETA(4)*EXP(ETA(4))
S1=V
$DES
C1=A(1)/S1
DADT(1)=-K10*A(1)-C1*VM/(KM+C1)
$THETA (5,10,100) (0,.1,10) (40,50,150) (.05,.1,.2)
$OMEGA .25 1 .25 .25
$ERROR
DEL=0
IF (F.EQ.0) DEL=1
W=F+DEL
Y=F*(1+ERR(1))+ERR(2)
IPRED=F
IRES=DV-IPRED
IWRES=IRES/W
$SIGMA 0.04 .05
$EST MAXEVALS=9000 POSTHOC
$TABLE ID TIME DV IPRED VM KM V K10
$SCATTERPLOT PRED VS DV