$PROB PK 1 cpt voie orale
$INPUT ID TIME DV AMT AGE WT CREA
$DATA ..\data.csv IGNORE=#
$SUBROUTINE ADVAN2 TRANS2  ; 1 cpt voie orale
$PK
  CL  =THETA(1) * EXP(ETA(1))
  V   =THETA(2) * EXP(ETA(2))
  KA  =THETA(3) * EXP(ETA(3))
   
  K=CL/V   ; REPARAMETRISATION
  S2=V     ; SCALE

$ERROR
  DEL=0
  IF (F.EQ.0) DEL=1
  W=F+DEL
  Y=F+W*EPS(1)
  IPRED=F
  IRES=DV-IPRED
  IWRES=IRES/W

$THETA    (0,  5)    ; CL
$THETA    (0, 50)   ; VC
$THETA    (0,  1)   ; KA
 
$OMEGA 0.5; OM_CL 
$OMEGA 0.1; OM_VC
$OMEGA 0.1; OM_KA 

$SIGMA 0.1; SIM_P

$EST METHOD=1 INT MAXEVAL=8000 PRINT=5 NOABORT POSTHOC NSIG=3
$COVARIANCE
$TABLE ID TIME DV PRED WRES RES IPRED IRES IWRES FILE=base.fit
$TABLE ID AMT KA CL V AGE WT CREA ETA1 ETA2 ETA3
  FIRSTONLY NOPRINT NOAPPEND 
  FILE=parameter.fit