Learn R Programming

nlmeODE (version 0.2-4)

IVInf: Simulated PK data with a single IV infusion

Description

Simulated data of an intraveneous infusion study with a single IV infusion administered to twelve subjects and PK plasma concentration measurements at twelve time points pr. subject.

Usage

data(IVInf)

Arguments

Examples

Run this code
data(IVInf)

onecompIV <- list(DiffEq=list(            
                    dy1dt = ~ -ke*y1),    
                  ObsEq=list(             
                    c1 = ~ y1/Vd),        
                  States=c("y1"),         
                  Parms=c("ke","Vd"),     
                  Init=list(0))
                  
IVInfModel <- nlmeODE(onecompIV,IVInf)

fit <- nlme(Conc ~ IVInfModel(ke,Vd,Time,Subject),
   data = IVInf, fixed=ke+Vd~1, random = pdDiag(ke~1), 
   start=c(ke=log(0.1),Vd=log(1.5)),
   control=list(msVerbose=TRUE,tolerance=1e-3,pnlsTol=1e-3,msTol=1e-3),
   verbose=TRUE)

plot(augPred(fit,level=0:1,length.out=300))

Run the code above in your browser using DataLab