# \donttest{
library(Certara.RsNLME)
library(Certara.Xpose.NLME)
model <- pkmodel(
parameterization = "Clearance",
numCompartments = 2,
data = pkData,
ID = "Subject",
Time = "Act_Time",
A1 = "Amount",
CObs = "Conc"
)
fit <- fitmodel(model)
xp <- xposeNlmeModel(
model = model,
fitmodelOutput = fit
)
# }
Run the code above in your browser using DataLab