$PROBLEM ANN ARBOR XFORM
$INPUT ID, AMT, TIME, WT, AGE, DV, EVID, MDV, REA
$DATA DATA1.TXT ;NOOPEN REWIND
$SUBROUTINES ADVAN2
$PK
  
     KA=THETA(1)*EXP(ETA(1))

     ET2=(EXP(ETA(2)*THETA(4))-1)/THETA(4)

     K=THETA(2)*EXP(ET2)
     
     S2=THETA(3)*WT
    
 
$THETA
(0,1)   ;KA
(0,.12) ;K
(0,.4)  ;VD
(.5)    ;LAMBDA TRANSFORM PARAMETER 
$OMEGA .25 ;INTER-SUBJECT VARIATION KA
$OMEGA BLOCK(1) .05 ;INTER-SUBJECT VARIATION K

$ERROR

 Y=F*(1+EPS(1))


$SIGMA .013    ;PROPORTIONAL ERROR
$ESTIMATION MAXEVALS=9000 PRINT=1 METHOD=1 INTERACTION
$COV
$SCAT DV VS PRED UNIT
$TABLE ONEHEADER NOPRINT FIRSTONLY ID ETA1 ETA2 REA FILE=T6A.TXT
;